home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1997-05-02 | 12.4 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Simis (archive/simis)
| ext
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| TrID
| Sybase iAnywhere database files
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| f9 fa f9 fa 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 2a 2a 2a 2a |........|....****|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000040| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000050| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000070| 2a 2a 2a 2a 2a 2a 2a 00 | 0a 2a 20 20 20 20 20 20 |*******.|.* |
|00000080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000090| 20 20 20 45 78 61 6d 70 | 6c 65 20 73 63 6f 70 65 | Examp|le scope|
|000000a0| 20 66 6f 72 20 48 69 70 | 70 6f 50 6c 61 79 65 72 | for Hip|poPlayer|
|000000b0| 0a 2a 09 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.*. | |
|000000c0| 20 20 20 20 20 20 20 20 | 20 20 20 42 79 20 4b 2d | | By K-|
|000000d0| 50 20 4b 6f 6c 6a 6f 6e | 65 6e 0a 2a 2a 2a 2a 2a |P Koljon|en.*****|
|000000e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000100| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 20 41 73 73 |********|**.* Ass|
|00000130| 65 6d 62 6c 65 73 20 77 | 69 74 68 20 41 73 6d 2d |embles w|ith Asm-|
|00000140| 4f 6e 65 20 76 31 2e 32 | 35 2c 20 61 74 20 6c 65 |One v1.2|5, at le|
|00000150| 61 73 74 2e 20 57 6f 72 | 6b 73 20 6f 6e 20 61 6c |ast. Wor|ks on al|
|00000160| 6c 20 41 6d 69 67 61 20 | 63 6f 6e 66 69 67 75 72 |l Amiga |configur|
|00000170| 61 74 69 6f 6e 73 21 0a | 0a 0a 2a 2a 2a 20 49 6e |ations!.|..*** In|
|00000180| 63 6c 75 64 65 73 3a 0a | 0a 20 09 69 6e 63 64 69 |cludes:.|. .incdi|
|00000190| 72 09 69 6e 63 6c 75 64 | 65 3a 0a 09 69 6e 63 6c |r.includ|e:..incl|
|000001a0| 75 64 65 09 65 78 65 63 | 2f 65 78 65 63 5f 6c 69 |ude.exec|/exec_li|
|000001b0| 62 2e 69 0a 09 69 6e 63 | 6c 75 64 65 09 65 78 65 |b.i..inc|lude.exe|
|000001c0| 63 2f 70 6f 72 74 73 2e | 69 0a 09 69 6e 63 6c 75 |c/ports.|i..inclu|
|000001d0| 64 65 09 65 78 65 63 2f | 74 79 70 65 73 2e 69 0a |de.exec/|types.i.|
|000001e0| 09 69 6e 63 6c 75 64 65 | 09 67 72 61 70 68 69 63 |.include|.graphic|
|000001f0| 73 2f 67 72 61 70 68 69 | 63 73 5f 6c 69 62 2e 69 |s/graphi|cs_lib.i|
|00000200| 0a 09 69 6e 63 6c 75 64 | 65 09 67 72 61 70 68 69 |..includ|e.graphi|
|00000210| 63 73 2f 72 61 73 74 70 | 6f 72 74 2e 69 0a 09 69 |cs/rastp|ort.i..i|
|00000220| 6e 63 6c 75 64 65 09 69 | 6e 74 75 69 74 69 6f 6e |nclude.i|ntuition|
|00000230| 2f 69 6e 74 75 69 74 69 | 6f 6e 5f 6c 69 62 2e 69 |/intuiti|on_lib.i|
|00000240| 0a 09 69 6e 63 6c 75 64 | 65 09 69 6e 74 75 69 74 |..includ|e.intuit|
|00000250| 69 6f 6e 2f 69 6e 74 75 | 69 74 69 6f 6e 2e 69 0a |ion/intu|ition.i.|
|00000260| 09 69 6e 63 64 69 72 0a | 0a 2a 2a 2a 20 53 6f 6d |.incdir.|.*** Som|
|00000270| 65 20 75 73 65 66 75 6c | 20 6d 61 63 72 6f 73 0a |e useful| macros.|
|00000280| 0a 6c 6f 62 09 6d 61 63 | 72 6f 0a 09 6a 73 72 09 |.lob.mac|ro..jsr.|
|00000290| 5f 4c 56 4f 5c 31 28 61 | 36 29 0a 09 65 6e 64 6d |_LVO\1(a|6)..endm|
|000002a0| 0a 0a 6c 6f 72 65 09 6d | 61 63 72 6f 0a 09 69 66 |..lore.m|acro..if|
|000002b0| 63 09 22 5c 31 22 2c 22 | 45 78 65 63 22 0a 09 69 |c."\1","|Exec"..i|
|000002c0| 66 64 09 5f 45 78 65 63 | 42 61 73 65 0a 09 69 66 |fd._Exec|Base..if|
|000002d0| 65 71 09 5f 45 78 65 63 | 42 61 73 65 0a 09 6d 6f |eq._Exec|Base..mo|
|000002e0| 76 65 2e 6c 09 28 61 35 | 29 2c 61 36 0a 09 65 6c |ve.l.(a5|),a6..el|
|000002f0| 73 65 0a 09 6d 6f 76 65 | 2e 6c 09 5f 45 78 65 63 |se..move|.l._Exec|
|00000300| 42 61 73 65 28 61 35 29 | 2c 61 36 0a 09 65 6e 64 |Base(a5)|,a6..end|
|00000310| 63 0a 09 65 6c 73 65 0a | 09 6d 6f 76 65 2e 6c 09 |c..else.|.move.l.|
|00000320| 34 2e 77 2c 61 36 0a 09 | 65 6e 64 63 0a 09 65 6c |4.w,a6..|endc..el|
|00000330| 73 65 0a 09 6d 6f 76 65 | 2e 6c 09 5f 5c 31 42 61 |se..move|.l._\1Ba|
|00000340| 73 65 28 61 35 29 2c 61 | 36 0a 09 65 6e 64 63 0a |se(a5),a|6..endc.|
|00000350| 09 6a 73 72 09 5f 4c 56 | 4f 5c 32 28 61 36 29 0a |.jsr._LV|O\2(a6).|
|00000360| 09 65 6e 64 6d 0a 0a 70 | 75 73 68 6d 09 6d 61 63 |.endm..p|ushm.mac|
|00000370| 72 6f 0a 09 69 66 63 09 | 22 5c 31 22 2c 22 61 6c |ro..ifc.|"\1","al|
|00000380| 6c 22 0a 09 6d 6f 76 65 | 6d 2e 6c 09 64 30 2d 61 |l"..move|m.l.d0-a|
|00000390| 36 2c 2d 28 73 70 29 0a | 09 65 6c 73 65 0a 09 6d |6,-(sp).|.else..m|
|000003a0| 6f 76 65 6d 2e 6c 09 5c | 31 2c 2d 28 73 70 29 0a |ovem.l.\|1,-(sp).|
|000003b0| 09 65 6e 64 63 0a 09 65 | 6e 64 6d 0a 0a 70 6f 70 |.endc..e|ndm..pop|
|000003c0| 6d 09 6d 61 63 72 6f 0a | 09 69 66 63 09 22 5c 31 |m.macro.|.ifc."\1|
|000003d0| 22 2c 22 61 6c 6c 22 0a | 09 6d 6f 76 65 6d 2e 6c |","all".|.movem.l|
|000003e0| 09 28 73 70 29 2b 2c 64 | 30 2d 61 36 0a 09 65 6c |.(sp)+,d|0-a6..el|
|000003f0| 73 65 0a 09 6d 6f 76 65 | 6d 2e 6c 09 28 73 70 29 |se..move|m.l.(sp)|
|00000400| 2b 2c 5c 31 0a 09 65 6e | 64 63 0a 09 65 6e 64 6d |+,\1..en|dc..endm|
|00000410| 0a 0a 70 75 73 68 09 6d | 61 63 72 6f 0a 09 6d 6f |..push.m|acro..mo|
|00000420| 76 65 2e 6c 09 5c 31 2c | 2d 28 73 70 29 0a 09 65 |ve.l.\1,|-(sp)..e|
|00000430| 6e 64 6d 0a 0a 70 6f 70 | 09 6d 61 63 72 6f 0a 09 |ndm..pop|.macro..|
|00000440| 6d 6f 76 65 2e 6c 09 28 | 73 70 29 2b 2c 5c 31 0a |move.l.(|sp)+,\1.|
|00000450| 09 65 6e 64 6d 0a 0a 0a | 0a 2a 2a 2a 20 48 69 70 |.endm...|.*** Hip|
|00000460| 70 6f 50 6c 61 79 65 72 | 27 73 20 70 6f 72 74 3a |poPlayer|'s port:|
|00000470| 0a 0a 09 53 54 52 55 43 | 54 55 52 45 09 48 69 70 |...STRUC|TURE.Hip|
|00000480| 70 6f 50 6f 72 74 2c 4d | 50 5f 53 49 5a 45 0a 09 |poPort,M|P_SIZE..|
|00000490| 4c 4f 4e 47 09 09 68 69 | 70 5f 70 72 69 76 61 74 |LONG..hi|p_privat|
|000004a0| 65 31 09 2a 20 50 72 69 | 76 61 74 65 2e 2e 0a 09 |e1.* Pri|vate....|
|000004b0| 41 50 54 52 09 09 68 69 | 70 5f 6b 70 6c 62 61 73 |APTR..hi|p_kplbas|
|000004c0| 65 09 2a 20 6b 70 6c 62 | 61 73 65 20 61 64 64 72 |e.* kplb|ase addr|
|000004d0| 65 73 73 0a 09 57 4f 52 | 44 09 09 68 69 70 5f 72 |ess..WOR|D..hip_r|
|000004e0| 65 73 65 72 76 65 64 30 | 09 2a 20 50 72 69 76 61 |eserved0|.* Priva|
|000004f0| 74 65 2e 2e 0a 09 42 59 | 54 45 09 09 68 69 70 5f |te....BY|TE..hip_|
|00000500| 71 75 69 74 09 2a 20 49 | 66 20 6e 6f 6e 2d 7a 65 |quit.* I|f non-ze|
|00000510| 72 6f 2c 20 77 65 20 6d | 75 73 74 20 71 75 69 74 |ro, we m|ust quit|
|00000520| 0a 09 42 59 54 45 09 09 | 68 69 70 5f 6f 70 65 6e |..BYTE..|hip_open|
|00000530| 63 6f 75 6e 74 09 2a 20 | 4f 70 65 6e 20 63 6f 75 |count.* |Open cou|
|00000540| 6e 74 0a 09 42 59 54 45 | 09 09 68 69 70 5f 6d 61 |nt..BYTE|..hip_ma|
|00000550| 69 6e 76 6f 6c 75 6d 65 | 09 2a 20 4d 61 69 6e 20 |involume|.* Main |
|00000560| 76 6f 6c 75 6d 65 2c 20 | 30 2d 36 34 0a 09 42 59 |volume, |0-64..BY|
|00000570| 54 45 09 09 68 69 70 5f | 70 6c 61 79 09 2a 20 49 |TE..hip_|play.* I|
|00000580| 66 20 6e 6f 6e 2d 7a 65 | 72 6f 2c 20 48 69 50 20 |f non-ze|ro, HiP |
|00000590| 69 73 20 70 6c 61 79 69 | 6e 67 0a 09 42 59 54 45 |is playi|ng..BYTE|
|000005a0| 09 09 68 69 70 5f 70 6c | 61 79 65 72 74 79 70 65 |..hip_pl|ayertype|
|000005b0| 20 09 2a 20 33 33 20 3d | 20 50 72 6f 74 72 61 63 | .* 33 =| Protrac|
|000005c0| 6b 65 72 2c 20 34 39 20 | 3d 20 50 53 33 4d 2e 0a |ker, 49 |= PS3M..|
|000005d0| 09 2a 2a 2a 20 50 72 6f | 74 72 61 63 6b 65 72 20 |.*** Pro|tracker |
|000005e0| 2a 2a 2a 0a 09 42 59 54 | 45 09 09 68 69 70 5f 72 |***..BYT|E..hip_r|
|000005f0| 65 73 65 72 76 65 64 32 | 0a 09 41 50 54 52 09 09 |eserved2|..APTR..|
|00000600| 68 69 70 5f 50 54 63 68 | 31 09 2a 20 50 72 6f 74 |hip_PTch|1.* Prot|
|00000610| 72 61 63 6b 65 72 20 63 | 68 61 6e 6e 65 6c 20 64 |racker c|hannel d|
|00000620| 61 74 61 20 66 6f 72 20 | 63 68 31 0a 09 41 50 54 |ata for |ch1..APT|
|00000630| 52 09 09 68 69 70 5f 50 | 54 63 68 32 09 2a 20 63 |R..hip_P|Tch2.* c|
|00000640| 68 32 0a 09 41 50 54 52 | 09 09 68 69 70 5f 50 54 |h2..APTR|..hip_PT|
|00000650| 63 68 33 09 2a 20 63 68 | 33 0a 09 41 50 54 52 09 |ch3.* ch|3..APTR.|
|00000660| 09 68 69 70 5f 50 54 63 | 68 34 09 2a 20 63 68 34 |.hip_PTc|h4.* ch4|
|00000670| 0a 09 2a 2a 2a 20 50 53 | 33 4d 20 2a 2a 2a 0a 09 |..*** PS|3M ***..|
|00000680| 41 50 54 52 09 09 68 69 | 70 5f 70 73 33 6d 6c 65 |APTR..hi|p_ps3mle|
|00000690| 66 74 09 2a 20 42 75 66 | 66 65 72 20 66 6f 72 20 |ft.* Buf|fer for |
|000006a0| 74 68 65 20 6c 65 66 74 | 20 73 69 64 65 0a 09 41 |the left| side..A|
|000006b0| 50 54 52 09 09 68 69 70 | 5f 70 73 33 6d 72 69 67 |PTR..hip|_ps3mrig|
|000006c0| 68 74 09 2a 20 42 75 66 | 66 65 72 20 66 6f 72 20 |ht.* Buf|fer for |
|000006d0| 74 68 65 20 72 69 67 68 | 74 20 73 69 64 65 0a 09 |the righ|t side..|
|000006e0| 4c 4f 4e 47 09 09 68 69 | 70 5f 70 73 33 6d 6f 66 |LONG..hi|p_ps3mof|
|000006f0| 66 73 09 2a 20 50 6c 61 | 79 69 6e 67 20 70 6f 73 |fs.* Pla|ying pos|
|00000700| 69 74 69 6f 6e 0a 09 4c | 4f 4e 47 09 09 68 69 70 |ition..L|ONG..hip|
|00000710| 5f 70 73 33 6d 6d 61 78 | 6f 66 66 73 09 2a 20 4d |_ps3mmax|offs.* M|
|00000720| 61 78 20 76 61 6c 75 65 | 20 66 6f 72 20 68 69 70 |ax value| for hip|
|00000730| 5f 70 73 33 6d 6f 66 66 | 73 0a 0a 09 42 59 54 45 |_ps3moff|s...BYTE|
|00000740| 09 09 68 69 70 5f 50 54 | 74 72 69 67 67 65 72 31 |..hip_PT|trigger1|
|00000750| 0a 09 42 59 54 45 09 09 | 68 69 70 5f 50 54 74 72 |..BYTE..|hip_PTtr|
|00000760| 69 67 67 65 72 32 0a 09 | 42 59 54 45 09 09 68 69 |igger2..|BYTE..hi|
|00000770| 70 5f 50 54 74 72 69 67 | 67 65 72 33 0a 09 42 59 |p_PTtrig|ger3..BY|
|00000780| 54 45 09 09 68 69 70 5f | 50 54 74 72 69 67 67 65 |TE..hip_|PTtrigge|
|00000790| 72 34 0a 0a 09 41 50 54 | 52 20 20 20 20 20 20 20 |r4...APT|R |
|000007a0| 20 20 20 20 20 68 69 70 | 5f 70 72 69 76 61 74 65 | hip|_private|
|000007b0| 32 0a 09 4c 4f 4e 47 20 | 20 20 20 20 20 20 20 20 |2..LONG | |
|000007c0| 20 20 20 68 69 70 5f 70 | 6c 61 79 74 69 6d 65 20 | hip_p|laytime |
|000007d0| 20 20 20 2a 20 4d 6f 64 | 75 6c 65 20 74 69 6d 65 | * Mod|ule time|
|000007e0| 20 70 6c 61 79 65 64 20 | 69 6e 20 73 65 63 73 0a | played |in secs.|
|000007f0| 09 4c 4f 4e 47 20 20 20 | 20 20 20 20 20 20 20 20 |.LONG | |
|00000800| 20 68 69 70 5f 63 6f 6c | 6f 72 64 69 76 20 20 20 | hip_col|ordiv |
|00000810| 20 2a 20 53 65 65 20 62 | 65 6c 6f 77 2e 0a 09 57 | * See b|elow...W|
|00000820| 4f 52 44 20 20 20 20 20 | 20 20 20 20 20 20 20 68 |ORD | h|
|00000830| 69 70 5f 70 73 33 6d 72 | 61 74 65 20 20 20 20 2a |ip_ps3mr|ate *|
|00000840| 20 50 53 33 4d 20 6d 69 | 78 69 6e 67 20 72 61 74 | PS3M mi|xing rat|
|00000850| 65 0a 09 4c 41 42 45 4c | 09 09 48 69 70 70 6f 50 |e..LABEL|..HippoP|
|00000860| 6f 72 74 5f 53 49 5a 45 | 4f 46 0a 0a 09 2a 2a 2a |ort_SIZE|OF...***|
|00000870| 20 50 54 20 63 68 61 6e | 6e 65 6c 20 64 61 74 61 | PT chan|nel data|
|00000880| 20 62 6c 6f 63 6b 0a 09 | 53 54 52 55 43 54 55 52 | block..|STRUCTUR|
|00000890| 45 09 50 54 63 68 2c 30 | 0a 09 4c 4f 4e 47 09 09 |E.PTch,0|..LONG..|
|000008a0| 50 54 63 68 5f 73 74 61 | 72 74 09 2a 20 53 74 61 |PTch_sta|rt.* Sta|
|000008b0| 72 74 20 61 64 64 72 65 | 73 73 20 6f 66 20 73 61 |rt addre|ss of sa|
|000008c0| 6d 70 6c 65 0a 09 57 4f | 52 44 09 09 50 54 63 68 |mple..WO|RD..PTch|
|000008d0| 5f 6c 65 6e 67 74 68 09 | 2a 20 4c 65 6e 67 74 68 |_length.|* Length|
|000008e0| 20 6f 66 20 73 61 6d 70 | 6c 65 20 69 6e 20 77 6f | of samp|le in wo|
|000008f0| 72 64 73 0a 09 4c 4f 4e | 47 09 09 50 54 63 68 5f |rds..LON|G..PTch_|
|00000900| 6c 6f 6f 70 73 74 61 72 | 74 09 2a 20 53 74 61 72 |loopstar|t.* Star|
|00000910| 74 20 61 64 64 72 65 73 | 73 20 6f 66 20 6c 6f 6f |t addres|s of loo|
|00000920| 70 0a 09 57 4f 52 44 09 | 09 50 54 63 68 5f 72 65 |p..WORD.|.PTch_re|
|00000930| 70 6c 65 6e 09 2a 20 4c | 6f 6f 70 20 6c 65 6e 67 |plen.* L|oop leng|
|00000940| 74 68 20 69 6e 20 77 6f | 72 64 73 0a 09 57 4f 52 |th in wo|rds..WOR|
|00000950| 44 09 09 50 54 63 68 5f | 76 6f 6c 75 6d 65 09 2a |D..PTch_|volume.*|
|00000960| 20 43 68 61 6e 6e 65 6c | 20 76 6f 6c 75 6d 65 0a | Channel| volume.|
|00000970| 09 57 4f 52 44 09 09 50 | 54 63 68 5f 70 65 72 69 |.WORD..P|Tch_peri|
|00000980| 6f 64 09 2a 20 43 68 61 | 6e 6e 65 6c 20 70 65 72 |od.* Cha|nnel per|
|00000990| 69 6f 64 0a 09 57 4f 52 | 44 09 09 50 54 63 68 5f |iod..WOR|D..PTch_|
|000009a0| 70 72 69 76 61 74 65 31 | 09 2a 20 50 72 69 76 61 |private1|.* Priva|
|000009b0| 74 65 2e 2e 2e 0a 0a 2a | 2a 2a 20 44 69 6d 65 6e |te.....*|** Dimen|
|000009c0| 73 69 6f 6e 73 3a 0a 0a | 57 49 44 54 48 09 3d 09 |sions:..|WIDTH.=.|
|000009d0| 33 32 30 09 0a 48 45 49 | 47 48 54 09 3d 09 36 34 |320..HEI|GHT.=.64|
|000009e0| 0a 0a 2a 2a 2a 20 56 61 | 72 69 61 62 6c 65 73 3a |..*** Va|riables:|
|000009f0| 0a 0a 09 72 73 72 65 73 | 65 74 0a 5f 45 78 65 63 |...rsres|et._Exec|
|00000a00| 42 61 73 65 09 72 73 2e | 6c 09 31 0a 5f 47 46 58 |Base.rs.|l.1._GFX|
|00000a10| 42 61 73 65 09 72 73 2e | 6c 09 31 0a 5f 49 6e 74 |Base.rs.|l.1._Int|
|00000a20| 75 69 42 61 73 65 09 72 | 73 2e 6c 09 31 0a 70 6f |uiBase.r|s.l.1.po|
|00000a30| 72 74 09 09 72 73 2e 6c | 09 31 0a 6f 77 6e 74 61 |rt..rs.l|.1.ownta|
|00000a40| 73 6b 09 09 72 73 2e 6c | 09 31 0a 73 63 72 65 65 |sk..rs.l|.1.scree|
|00000a50| 6e 6c 6f 63 6b 09 72 73 | 2e 6c 09 31 0a 6f 6c 64 |nlock.rs|.l.1.old|
|00000a60| 70 72 69 09 09 72 73 2e | 6c 09 31 0a 77 69 6e 64 |pri..rs.|l.1.wind|
|00000a70| 6f 77 62 61 73 65 09 72 | 73 2e 6c 09 31 0a 72 61 |owbase.r|s.l.1.ra|
|00000a80| 73 74 70 6f 72 74 09 72 | 73 2e 6c 09 31 0a 75 73 |stport.r|s.l.1.us|
|00000a90| 65 72 70 6f 72 74 09 72 | 73 2e 6c 09 31 0a 77 69 |erport.r|s.l.1.wi|
|00000aa0| 6e 64 6f 77 74 6f 70 09 | 72 73 09 31 0a 77 69 6e |ndowtop.|rs.1.win|
|00000ab0| 64 6f 77 74 6f 70 62 09 | 72 73 09 31 0a 77 69 6e |dowtopb.|rs.1.win|
|00000ac0| 64 6f 77 72 69 67 68 74 | 09 72 73 09 31 0a 77 69 |dowright|.rs.1.wi|
|00000ad0| 6e 64 6f 77 6c 65 66 74 | 09 72 73 09 31 0a 77 69 |ndowleft|.rs.1.wi|
|00000ae0| 6e 64 6f 77 62 6f 74 74 | 6f 6d 09 72 73 09 31 0a |ndowbott|om.rs.1.|
|00000af0| 64 72 61 77 31 09 09 72 | 73 2e 6c 09 31 0a 64 72 |draw1..r|s.l.1.dr|
|00000b00| 61 77 32 09 09 72 73 2e | 6c 09 31 0a 6f 6d 61 62 |aw2..rs.|l.1.omab|
|00000b10| 69 74 6d 61 70 09 72 73 | 2e 62 09 62 6d 5f 53 49 |itmap.rs|.b.bm_SI|
|00000b20| 5a 45 4f 46 0a 73 69 7a | 65 5f 76 61 72 09 72 73 |ZEOF.siz|e_var.rs|
|00000b30| 2e 62 09 30 0a 0a 2a 2a | 2a 20 4d 61 69 6e 20 70 |.b.0..**|* Main p|
|00000b40| 72 6f 67 72 61 6d 0a 0a | 6d 61 69 6e 09 6c 65 61 |rogram..|main.lea|
|00000b50| 09 76 61 72 5f 62 2c 61 | 35 09 09 2a 20 53 74 6f |.var_b,a|5..* Sto|
|00000b60| 72 65 20 65 78 65 63 62 | 61 73 65 0a 09 6d 6f 76 |re execb|ase..mov|
|00000b70| 65 2e 6c 09 34 2e 77 2c | 61 36 0a 09 6d 6f 76 65 |e.l.4.w,|a6..move|
|00000b80| 2e 6c 09 61 36 2c 28 61 | 35 29 0a 09 0a 09 73 75 |.l.a6,(a|5)....su|
|00000b90| 62 2e 6c 09 61 31 2c 61 | 31 09 09 09 2a 20 46 69 |b.l.a1,a|1...* Fi|
|00000ba0| 6e 64 20 6f 75 72 20 70 | 72 6f 63 65 73 73 0a 09 |nd our p|rocess..|
|00000bb0| 6c 6f 62 09 46 69 6e 64 | 54 61 73 6b 0a 09 6d 6f |lob.Find|Task..mo|
|00000bc0| 76 65 2e 6c 09 64 30 2c | 6f 77 6e 74 61 73 6b 28 |ve.l.d0,|owntask(|
|00000bd0| 61 35 29 0a 0a 09 6c 65 | 61 09 69 6e 74 75 69 6e |a5)...le|a.intuin|
|00000be0| 61 6d 65 28 70 63 29 2c | 61 31 09 2a 20 4f 70 65 |ame(pc),|a1.* Ope|
|00000bf0| 6e 20 6c 69 62 73 0a 09 | 6c 6f 72 65 09 45 78 65 |n libs..|lore.Exe|
|00000c00| 63 2c 4f 6c 64 4f 70 65 | 6e 4c 69 62 72 61 72 79 |c,OldOpe|nLibrary|
|00000c10| 0a 09 6d 6f 76 65 2e 6c | 09 64 30 2c 5f 49 6e 74 |..move.l|.d0,_Int|
|00000c20| 75 69 42 61 73 65 28 61 | 35 29 0a 0a 09 6c 65 61 |uiBase(a|5)...lea|
|00000c30| 20 09 67 66 78 6e 61 6d | 65 28 70 63 29 2c 61 31 | .gfxnam|e(pc),a1|
|00000c40| 09 09 0a 09 6c 6f 62 09 | 4f 6c 64 4f 70 65 6e 4c |....lob.|OldOpenL|
|00000c50| 69 62 72 61 72 79 0a 09 | 6d 6f 76 65 2e 6c 09 64 |ibrary..|move.l.d|
|00000c60| 30 2c 5f 47 46 58 42 61 | 73 65 28 61 35 29 0a 0a |0,_GFXBa|se(a5)..|
|00000c70| 2a 2a 2a 20 54 72 79 20 | 74 6f 20 66 69 6e 64 20 |*** Try |to find |
|00000c80| 48 69 70 70 6f 50 6c 61 | 79 65 72 27 73 20 70 6f |HippoPla|yer's po|
|00000c90| 72 74 2e 20 49 66 20 73 | 75 63 63 65 73 66 75 6c |rt. If s|uccesful|
|00000ca0| 2c 20 61 64 64 20 31 20 | 74 6f 20 68 69 70 5f 6f |, add 1 |to hip_o|
|00000cb0| 70 65 6e 63 6f 75 6e 74 | 0a 2a 2a 2a 20 69 6e 64 |pencount|.*** ind|
|00000cc0| 69 63 61 74 69 6e 67 20 | 77 65 20 61 72 65 20 75 |icating |we are u|
|00000cd0| 73 69 6e 67 20 74 68 65 | 20 69 6e 66 6f 72 6d 61 |sing the| informa|
|00000ce0| 74 69 6f 6e 20 69 6e 20 | 74 68 65 20 70 6f 72 74 |tion in |the port|
|00000cf0| 2e 0a 2a 2a 2a 20 50 72 | 6f 74 65 63 74 20 74 68 |..*** Pr|otect th|
|00000d00| 69 73 20 70 72 6f 63 65 | 64 75 72 65 20 77 69 74 |is proce|dure wit|
|00000d10| 68 20 46 6f 72 62 69 64 | 28 29 2d 50 65 72 6d 69 |h Forbid|()-Permi|
|00000d20| 74 28 29 21 0a 0a 09 6c | 6f 62 09 46 6f 72 62 69 |t()!...l|ob.Forbi|
|00000d30| 64 0a 09 6c 65 61 09 70 | 6f 72 74 6e 61 6d 65 28 |d..lea.p|ortname(|
|00000d40| 70 63 29 2c 61 31 0a 09 | 6c 6f 62 09 46 69 6e 64 |pc),a1..|lob.Find|
|00000d50| 50 6f 72 74 0a 09 6d 6f | 76 65 2e 6c 09 64 30 2c |Port..mo|ve.l.d0,|
|00000d60| 70 6f 72 74 28 61 35 29 | 0a 09 62 65 71 2e 77 09 |port(a5)|..beq.w.|
|00000d70| 65 78 69 74 0a 09 6d 6f | 76 65 2e 6c 09 64 30 2c |exit..mo|ve.l.d0,|
|00000d80| 61 30 0a 09 61 64 64 71 | 2e 62 09 23 31 2c 68 69 |a0..addq|.b.#1,hi|
|00000d90| 70 5f 6f 70 65 6e 63 6f | 75 6e 74 28 61 30 29 09 |p_openco|unt(a0).|
|00000da0| 2a 20 57 65 20 61 72 65 | 20 75 73 69 6e 67 20 74 |* We are| using t|
|00000db0| 68 65 20 70 6f 72 74 20 | 6e 6f 77 21 0a 09 6c 6f |he port |now!..lo|
|00000dc0| 62 09 50 65 72 6d 69 74 | 0a 0a 2a 2a 2a 20 47 65 |b.Permit|..*** Ge|
|00000dd0| 74 20 73 6f 6d 65 20 69 | 6e 66 6f 20 61 62 6f 75 |t some i|nfo abou|
|00000de0| 74 20 74 68 65 20 73 63 | 72 65 65 6e 20 77 65 27 |t the sc|reen we'|
|00000df0| 72 65 20 72 75 6e 6e 69 | 6e 67 20 6f 6e 0a 0a 09 |re runni|ng on...|
|00000e00| 62 73 72 2e 77 09 67 65 | 74 73 63 72 65 65 6e 64 |bsr.w.ge|tscreend|
|00000e10| 61 74 61 0a 0a 2a 2a 2a | 20 4f 70 65 6e 20 6f 75 |ata..***| Open ou|
|00000e20| 72 20 77 69 6e 64 6f 77 | 0a 0a 09 6c 65 61 09 77 |r window|...lea.w|
|00000e30| 69 6e 73 74 72 75 63 2c | 61 30 0a 09 6c 6f 72 65 |instruc,|a0..lore|
|00000e40| 09 49 6e 74 75 69 2c 4f | 70 65 6e 57 69 6e 64 6f |.Intui,O|penWindo|
|00000e50| 77 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 77 69 6e |w..move.|l.d0,win|
|00000e60| 64 6f 77 62 61 73 65 28 | 61 35 29 0a 09 62 65 71 |dowbase(|a5)..beq|
|00000e70| 2e 77 09 65 78 69 74 0a | 09 6d 6f 76 65 2e 6c 09 |.w.exit.|.move.l.|
|00000e80| 64 30 2c 61 30 0a 09 6d | 6f 76 65 2e 6c 09 77 64 |d0,a0..m|ove.l.wd|
|00000e90| 5f 52 50 6f 72 74 28 61 | 30 29 2c 72 61 73 74 70 |_RPort(a|0),rastp|
|00000ea0| 6f 72 74 28 61 35 29 09 | 2a 20 53 74 6f 72 65 20 |ort(a5).|* Store |
|00000eb0| 72 61 73 74 70 6f 72 74 | 20 61 6e 64 20 75 73 65 |rastport| and use|
|00000ec0| 72 70 6f 72 74 0a 09 6d | 6f 76 65 2e 6c 09 77 64 |rport..m|ove.l.wd|
|00000ed0| 5f 55 73 65 72 50 6f 72 | 74 28 61 30 29 2c 75 73 |_UserPor|t(a0),us|
|00000ee0| 65 72 70 6f 72 74 28 61 | 35 29 0a 0a 2a 2a 2a 20 |erport(a|5)..*** |
|00000ef0| 44 72 61 77 20 61 20 62 | 65 76 65 6c 20 62 6f 78 |Draw a b|evel box|
|00000f00| 0a 0a 70 6c 78 31 09 65 | 71 75 72 09 64 34 0a 70 |..plx1.e|qur.d4.p|
|00000f10| 6c 78 32 09 65 71 75 72 | 09 64 35 0a 70 6c 79 31 |lx2.equr|.d5.ply1|
|00000f20| 09 65 71 75 72 09 64 36 | 0a 70 6c 79 32 09 65 71 |.equr.d6|.ply2.eq|
|00000f30| 75 72 09 64 37 0a 0a 09 | 6d 6f 76 65 71 20 20 20 |ur.d7...|moveq |
|00000f40| 23 37 2c 70 6c 78 31 0a | 09 6d 6f 76 65 20 20 20 |#7,plx1.|.move |
|00000f50| 20 23 33 33 32 2c 70 6c | 78 32 0a 09 6d 6f 76 65 | #332,pl|x2..move|
|00000f60| 71 20 20 20 23 31 33 2c | 70 6c 79 31 0a 09 6d 6f |q #13,|ply1..mo|
|00000f70| 76 65 71 20 20 20 23 38 | 30 2c 70 6c 79 32 0a 09 |veq #8|0,ply2..|
|00000f80| 61 64 64 09 77 69 6e 64 | 6f 77 6c 65 66 74 28 61 |add.wind|owleft(a|
|00000f90| 35 29 2c 70 6c 78 31 0a | 09 61 64 64 09 77 69 6e |5),plx1.|.add.win|
|00000fa0| 64 6f 77 6c 65 66 74 28 | 61 35 29 2c 70 6c 78 32 |dowleft(|a5),plx2|
|00000fb0| 0a 09 61 64 64 09 77 69 | 6e 64 6f 77 74 6f 70 28 |..add.wi|ndowtop(|
|00000fc0| 61 35 29 2c 70 6c 79 31 | 0a 09 61 64 64 09 77 69 |a5),ply1|..add.wi|
|00000fd0| 6e 64 6f 77 74 6f 70 28 | 61 35 29 2c 70 6c 79 32 |ndowtop(|a5),ply2|
|00000fe0| 0a 09 6d 6f 76 65 2e 6c | 09 72 61 73 74 70 6f 72 |..move.l|.rastpor|
|00000ff0| 74 28 61 35 29 2c 61 31 | 0a 09 62 73 72 09 6c 61 |t(a5),a1|..bsr.la|
|00001000| 61 74 69 6b 6b 6f 31 0a | 0a 2a 2a 2a 20 49 6e 69 |atikko1.|.*** Ini|
|00001010| 74 69 61 6c 69 7a 65 20 | 74 68 65 20 62 69 74 6d |tialize |the bitm|
|00001020| 61 70 20 73 74 72 75 63 | 74 75 72 65 0a 0a 09 6c |ap struc|ture...l|
|00001030| 65 61 09 6f 6d 61 62 69 | 74 6d 61 70 28 61 35 29 |ea.omabi|tmap(a5)|
|00001040| 2c 61 30 0a 09 6d 6f 76 | 65 71 09 23 31 2c 64 30 |,a0..mov|eq.#1,d0|
|00001050| 09 09 09 2a 20 64 65 70 | 74 68 20 28 31 20 62 69 |...* dep|th (1 bi|
|00001060| 74 70 6c 61 6e 65 29 0a | 09 6d 6f 76 65 09 23 57 |tplane).|.move.#W|
|00001070| 49 44 54 48 2c 64 31 09 | 09 2a 20 77 69 64 74 68 |IDTH,d1.|.* width|
|00001080| 0a 09 6d 6f 76 65 09 23 | 48 45 49 47 48 54 2c 64 |..move.#|HEIGHT,d|
|00001090| 32 09 09 2a 20 68 65 69 | 67 68 74 0a 09 6c 6f 72 |2..* hei|ght..lor|
|000010a0| 65 09 47 46 58 2c 49 6e | 69 74 42 69 74 4d 61 70 |e.GFX,In|itBitMap|
|000010b0| 0a 09 6d 6f 76 65 2e 6c | 09 23 62 75 66 66 65 72 |..move.l|.#buffer|
|000010c0| 31 2c 6f 6d 61 62 69 74 | 6d 61 70 2b 62 6d 5f 50 |1,omabit|map+bm_P|
|000010d0| 6c 61 6e 65 73 28 61 35 | 29 20 2a 20 50 6c 61 6e |lanes(a5|) * Plan|
|000010e0| 65 20 70 6f 69 6e 74 65 | 72 0a 0a 09 6d 6f 76 65 |e pointe|r...move|
|000010f0| 2e 6c 09 23 62 75 66 66 | 65 72 31 2c 64 72 61 77 |.l.#buff|er1,draw|
|00001100| 31 28 61 35 29 09 2a 20 | 42 75 66 66 65 72 20 70 |1(a5).* |Buffer p|
|00001110| 6f 69 6e 74 65 72 73 20 | 66 6f 72 20 64 72 61 77 |ointers |for draw|
|00001120| 69 6e 67 0a 09 6d 6f 76 | 65 2e 6c 09 23 62 75 66 |ing..mov|e.l.#buf|
|00001130| 66 65 72 32 2c 64 72 61 | 77 32 28 61 35 29 0a 0a |fer2,dra|w2(a5)..|
|00001140| 2a 2a 2a 20 53 65 74 20 | 74 61 73 6b 20 70 72 69 |*** Set |task pri|
|00001150| 6f 72 69 74 79 20 74 6f | 20 2d 33 30 20 74 6f 20 |ority to| -30 to |
|00001160| 70 72 65 76 65 6e 74 20 | 6d 65 73 73 69 6e 67 20 |prevent |messing |
|00001170| 75 70 20 77 69 74 68 20 | 6f 74 68 65 72 20 70 72 |up with |other pr|
|00001180| 6f 67 72 61 6d 73 0a 0a | 09 6d 6f 76 65 2e 6c 09 |ograms..|.move.l.|
|00001190| 6f 77 6e 74 61 73 6b 28 | 61 35 29 2c 61 31 09 09 |owntask(|a5),a1..|
|000011a0| 0a 09 6d 6f 76 65 71 09 | 23 2d 33 30 2c 64 30 0a |..moveq.|#-30,d0.|
|000011b0| 09 6c 6f 72 65 09 45 78 | 65 63 2c 53 65 74 54 61 |.lore.Ex|ec,SetTa|
|000011c0| 73 6b 50 72 69 0a 09 6d | 6f 76 65 2e 6c 09 64 30 |skPri..m|ove.l.d0|
|000011d0| 2c 6f 6c 64 70 72 69 28 | 61 35 29 09 09 2a 20 53 |,oldpri(|a5)..* S|
|000011e0| 74 6f 72 65 20 74 68 65 | 20 6f 6c 64 20 70 72 69 |tore the| old pri|
|000011f0| 6f 72 69 74 79 0a 0a 2a | 2a 2a 20 4d 61 69 6e 20 |ority..*|** Main |
|00001200| 6c 6f 6f 70 20 62 65 67 | 69 6e 73 20 68 65 72 65 |loop beg|ins here|
|00001210| 0a 0a 6c 6f 6f 70 09 6d | 6f 76 65 2e 6c 09 5f 47 |..loop.m|ove.l._G|
|00001220| 46 58 42 61 73 65 28 61 | 35 29 2c 61 36 09 09 2a |FXBase(a|5),a6..*|
|00001230| 20 57 61 69 74 20 61 20 | 77 68 69 6c 65 2e 2e 0a | Wait a |while...|
|00001240| 09 6c 6f 62 09 57 61 69 | 74 54 4f 46 0a 0a 09 6d |.lob.Wai|tTOF...m|
|00001250| 6f 76 65 2e 6c 09 70 6f | 72 74 28 61 35 29 2c 61 |ove.l.po|rt(a5),a|
|00001260| 30 09 09 0a 09 74 73 74 | 2e 62 09 68 69 70 5f 71 |0....tst|.b.hip_q|
|00001270| 75 69 74 28 61 30 29 09 | 09 2a 20 4d 75 73 74 20 |uit(a0).|.* Must |
|00001280| 77 65 20 71 75 69 74 3f | 0a 09 62 6e 65 2e 62 09 |we quit?|..bne.b.|
|00001290| 2e 78 0a 09 74 73 74 2e | 62 09 68 69 70 5f 70 6c |.x..tst.|b.hip_pl|
|000012a0| 61 79 28 61 30 29 09 09 | 2a 20 43 68 65 63 6b 20 |ay(a0)..|* Check |
|000012b0| 69 66 20 48 69 50 20 69 | 73 20 70 6c 61 79 69 6e |if HiP i|s playin|
|000012c0| 67 0a 09 62 65 71 2e 62 | 09 2e 6f 68 0a 0a 2a 2a |g..beq.b|..oh..**|
|000012d0| 2a 20 53 65 65 20 69 66 | 20 77 65 20 73 68 6f 75 |* See if| we shou|
|000012e0| 6c 64 20 61 63 74 75 61 | 6c 6c 79 20 75 70 64 61 |ld actua|lly upda|
|000012f0| 74 65 20 74 68 65 20 77 | 69 6e 64 6f 77 2e 0a 09 |te the w|indow...|
|00001300| 6d 6f 76 65 2e 6c 09 5f | 49 6e 74 75 69 42 61 73 |move.l._|IntuiBas|
|00001310| 65 28 61 35 29 2c 61 31 | 0a 09 6d 6f 76 65 2e 6c |e(a5),a1|..move.l|
|00001320| 09 69 62 5f 46 69 72 73 | 74 53 63 72 65 65 6e 28 |.ib_Firs|tScreen(|
|00001330| 61 31 29 2c 61 31 0a 09 | 6d 6f 76 65 2e 6c 09 77 |a1),a1..|move.l.w|
|00001340| 69 6e 64 6f 77 62 61 73 | 65 28 61 35 29 2c 61 30 |indowbas|e(a5),a0|
|00001350| 09 0a 09 63 6d 70 2e 6c | 09 77 64 5f 57 53 63 72 |...cmp.l|.wd_WScr|
|00001360| 65 65 6e 28 61 30 29 2c | 61 31 09 2a 20 49 73 20 |een(a0),|a1.* Is |
|00001370| 6f 75 72 20 73 63 72 65 | 65 6e 20 6f 6e 20 74 6f |our scre|en on to|
|00001380| 70 3f 0a 09 62 65 71 2e | 62 09 2e 79 65 73 0a 09 |p?..beq.|b..yes..|
|00001390| 74 73 74 09 73 63 5f 54 | 6f 70 45 64 67 65 28 61 |tst.sc_T|opEdge(a|
|000013a0| 31 29 09 20 09 2a 20 53 | 6f 6d 65 20 6f 74 68 65 |1). .* S|ome othe|
|000013b0| 72 20 73 63 72 65 65 6e | 20 69 73 20 70 61 72 74 |r screen| is part|
|000013c0| 69 61 6c 6c 79 20 6f 6e | 20 74 6f 70 0a 09 62 65 |ially on| top..be|
|000013d0| 71 2e 62 09 2e 6f 68 09 | 09 20 09 2a 20 6f 66 20 |q.b..oh.|. .* of |
|000013e0| 6f 75 72 20 73 63 72 65 | 65 6e 3f 0a 2e 79 65 73 |our scre|en?..yes|
|000013f0| 0a 09 62 73 72 2e 77 09 | 64 75 6e 67 09 09 09 2a |..bsr.w.|dung...*|
|00001400| 20 44 6f 20 74 68 65 20 | 73 63 6f 70 65 0a 2e 6f | Do the |scope..o|
|00001410| 68 0a 09 6d 6f 76 65 2e | 6c 09 75 73 65 72 70 6f |h..move.|l.userpo|
|00001420| 72 74 28 61 35 29 2c 61 | 30 09 09 2a 20 47 65 74 |rt(a5),a|0..* Get|
|00001430| 20 6d 65 73 73 61 67 65 | 73 20 66 72 6f 6d 20 49 | message|s from I|
|00001440| 44 43 4d 50 0a 09 6c 6f | 72 65 09 45 78 65 63 2c |DCMP..lo|re.Exec,|
|00001450| 47 65 74 4d 73 67 0a 09 | 74 73 74 2e 6c 09 64 30 |GetMsg..|tst.l.d0|
|00001460| 0a 09 62 65 71 2e 62 09 | 6c 6f 6f 70 0a 09 6d 6f |..beq.b.|loop..mo|
|00001470| 76 65 2e 6c 09 64 30 2c | 61 31 0a 0a 09 6d 6f 76 |ve.l.d0,|a1...mov|
|00001480| 65 2e 6c 09 69 6d 5f 43 | 6c 61 73 73 28 61 31 29 |e.l.im_C|lass(a1)|
|00001490| 2c 64 32 09 09 0a 09 6d | 6f 76 65 09 69 6d 5f 43 |,d2....m|ove.im_C|
|000014a0| 6f 64 65 28 61 31 29 2c | 64 33 0a 09 6c 6f 62 09 |ode(a1),|d3..lob.|
|000014b0| 52 65 70 6c 79 4d 73 67 | 0a 09 63 6d 70 2e 6c 09 |ReplyMsg|..cmp.l.|
|000014c0| 23 49 44 43 4d 50 5f 4d | 4f 55 53 45 42 55 54 54 |#IDCMP_M|OUSEBUTT|
|000014d0| 4f 4e 53 2c 64 32 09 2a | 20 52 69 67 68 74 20 6d |ONS,d2.*| Right m|
|000014e0| 6f 75 73 65 62 75 74 74 | 6f 6e 20 70 72 65 73 73 |ousebutt|on press|
|000014f0| 65 64 3f 0a 09 62 6e 65 | 2e 62 09 2e 78 79 0a 09 |ed?..bne|.b..xy..|
|00001500| 63 6d 70 09 23 4d 45 4e | 55 44 4f 57 4e 2c 64 33 |cmp.#MEN|UDOWN,d3|
|00001510| 0a 09 62 65 71 2e 62 09 | 2e 78 0a 2e 78 79 09 63 |..beq.b.|.x..xy.c|
|00001520| 6d 70 2e 6c 09 23 49 44 | 43 4d 50 5f 43 4c 4f 53 |mp.l.#ID|CMP_CLOS|
|00001530| 45 57 49 4e 44 4f 57 2c | 64 32 09 2a 20 53 68 6f |EWINDOW,|d2.* Sho|
|00001540| 75 6c 64 20 77 65 20 65 | 78 69 74 3f 0a 09 62 6e |uld we e|xit?..bn|
|00001550| 65 2e 62 09 6c 6f 6f 70 | 09 09 09 2a 20 4e 6f 2e |e.b.loop|...* No.|
|00001560| 20 4b 65 65 70 20 6c 6f | 6f 70 69 6e 27 0a 09 0a | Keep lo|opin'...|
|00001570| 2e 78 09 6d 6f 76 65 2e | 6c 09 6f 77 6e 74 61 73 |.x.move.|l.owntas|
|00001580| 6b 28 61 35 29 2c 61 31 | 09 09 2a 20 52 65 73 74 |k(a5),a1|..* Rest|
|00001590| 6f 72 65 20 74 68 65 20 | 6f 6c 64 20 70 72 69 6f |ore the |old prio|
|000015a0| 72 69 74 79 0a 09 6d 6f | 76 65 2e 6c 09 6f 6c 64 |rity..mo|ve.l.old|
|000015b0| 70 72 69 28 61 35 29 2c | 64 30 0a 09 6c 6f 72 65 |pri(a5),|d0..lore|
|000015c0| 09 45 78 65 63 2c 53 65 | 74 54 61 73 6b 50 72 69 |.Exec,Se|tTaskPri|
|000015d0| 0a 0a 65 78 69 74 0a 0a | 2a 2a 2a 20 45 78 69 74 |..exit..|*** Exit|
|000015e0| 20 70 72 6f 67 72 61 6d | 0a 09 0a 09 6d 6f 76 65 | program|....move|
|000015f0| 2e 6c 09 70 6f 72 74 28 | 61 35 29 2c 64 30 09 09 |.l.port(|a5),d0..|
|00001600| 2a 20 49 4d 50 4f 52 54 | 41 4e 54 21 20 53 75 62 |* IMPORT|ANT! Sub|
|00001610| 74 72 61 63 74 20 31 20 | 66 72 6f 6d 0a 09 62 65 |tract 1 |from..be|
|00001620| 71 2e 62 09 2e 75 68 30 | 09 09 09 2a 20 68 69 70 |q.b..uh0|...* hip|
|00001630| 5f 6f 70 65 6e 63 6f 75 | 6e 74 20 77 68 65 6e 20 |_opencou|nt when |
|00001640| 74 68 65 20 70 6f 72 74 | 20 69 73 20 6e 6f 74 0a |the port| is not.|
|00001650| 09 6d 6f 76 65 2e 6c 09 | 64 30 2c 61 30 09 09 09 |.move.l.|d0,a0...|
|00001660| 2a 20 6e 65 65 64 65 64 | 20 61 6e 79 6d 6f 72 65 |* needed| anymore|
|00001670| 21 0a 09 73 75 62 71 2e | 62 09 23 31 2c 68 69 70 |!..subq.|b.#1,hip|
|00001680| 5f 6f 70 65 6e 63 6f 75 | 6e 74 28 61 30 29 0a 2e |_opencou|nt(a0)..|
|00001690| 75 68 30 0a 0a 09 6d 6f | 76 65 2e 6c 09 77 69 6e |uh0...mo|ve.l.win|
|000016a0| 64 6f 77 62 61 73 65 28 | 61 35 29 2c 64 30 09 2a |dowbase(|a5),d0.*|
|000016b0| 20 43 6c 6f 73 65 20 74 | 68 65 20 77 69 6e 64 6f | Close t|he windo|
|000016c0| 77 0a 09 62 65 71 2e 62 | 09 2e 75 68 31 0a 09 6d |w..beq.b|..uh1..m|
|000016d0| 6f 76 65 2e 6c 09 64 30 | 2c 61 30 0a 09 6c 6f 72 |ove.l.d0|,a0..lor|
|000016e0| 65 09 49 6e 74 75 69 2c | 43 6c 6f 73 65 57 69 6e |e.Intui,|CloseWin|
|000016f0| 64 6f 77 0a 2e 75 68 31 | 0a 09 6d 6f 76 65 2e 6c |dow..uh1|..move.l|
|00001700| 09 5f 49 6e 74 75 69 42 | 61 73 65 28 61 35 29 2c |._IntuiB|ase(a5),|
|00001710| 61 31 09 2a 20 41 6e 64 | 20 74 68 65 20 6c 69 62 |a1.* And| the lib|
|00001720| 73 0a 09 6c 6f 72 65 09 | 45 78 65 63 2c 43 6c 6f |s..lore.|Exec,Clo|
|00001730| 73 65 4c 69 62 72 61 72 | 79 0a 09 6d 6f 76 65 2e |seLibrar|y..move.|
|00001740| 6c 09 5f 47 46 58 42 61 | 73 65 28 61 35 29 2c 61 |l._GFXBa|se(a5),a|
|00001750| 31 0a 09 6c 6f 62 09 43 | 6c 6f 73 65 4c 69 62 72 |1..lob.C|loseLibr|
|00001760| 61 72 79 0a 0a 09 6d 6f | 76 65 71 09 23 30 2c 64 |ary...mo|veq.#0,d|
|00001770| 30 09 09 09 2a 20 4e 6f | 20 65 72 72 6f 72 0a 09 |0...* No| error..|
|00001780| 72 74 73 0a 09 0a 2a 2a | 2a 2a 2a 20 47 65 74 20 |rts...**|*** Get |
|00001790| 73 6f 6d 65 20 69 6e 66 | 6f 20 61 62 6f 75 74 20 |some inf|o about |
|000017a0| 74 68 65 20 73 63 72 65 | 65 6e 20 77 65 27 72 65 |the scre|en we're|
|000017b0| 20 72 75 6e 6e 69 6e 67 | 20 6f 6e 0a 0a 67 65 74 | running| on..get|
|000017c0| 73 63 72 65 65 6e 64 61 | 74 61 0a 09 6d 6f 76 65 |screenda|ta..move|
|000017d0| 2e 6c 09 28 61 35 29 2c | 61 30 09 09 09 2a 20 52 |.l.(a5),|a0...* R|
|000017e0| 75 6e 6e 69 6e 67 20 6b | 69 63 6b 32 2e 30 20 6f |unning k|ick2.0 o|
|000017f0| 72 20 6e 65 77 65 72 3f | 0a 09 63 6d 70 09 23 33 |r newer?|..cmp.#3|
|00001800| 37 2c 4c 49 42 5f 56 45 | 52 53 49 4f 4e 28 61 30 |7,LIB_VE|RSION(a0|
|00001810| 29 0a 09 62 68 73 2e 62 | 09 2e 6e 65 77 09 09 0a |)..bhs.b|..new...|
|00001820| 09 72 74 73 09 09 09 09 | 0a 2e 6e 65 77 09 09 09 |.rts....|..new...|
|00001830| 09 09 2a 20 59 65 73 2e | 0a 09 0a 09 73 75 62 2e |..* Yes.|....sub.|
|00001840| 6c 09 61 30 2c 61 30 09 | 09 09 2a 20 44 65 66 61 |l.a0,a0.|..* Defa|
|00001850| 75 6c 74 20 70 75 62 6c | 69 63 20 73 63 72 65 65 |ult publ|ic scree|
|00001860| 6e 0a 09 6c 6f 72 65 09 | 49 6e 74 75 69 2c 4c 6f |n..lore.|Intui,Lo|
|00001870| 63 6b 50 75 62 53 63 72 | 65 65 6e 20 20 09 2a 20 |ckPubScr|een .* |
|00001880| 4b 69 63 6b 32 2e 30 2b | 20 66 75 6e 63 74 69 6f |Kick2.0+| functio|
|00001890| 6e 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 64 37 0a |n..move.|l.d0,d7.|
|000018a0| 09 62 65 71 2e 62 09 65 | 78 69 74 0a 0a 09 6d 6f |.beq.b.e|xit...mo|
|000018b0| 76 65 2e 6c 09 64 30 2c | 61 30 0a 09 6d 6f 76 65 |ve.l.d0,|a0..move|
|000018c0| 2e 62 09 73 63 5f 42 61 | 72 48 65 69 67 68 74 28 |.b.sc_Ba|rHeight(|
|000018d0| 61 30 29 2c 77 69 6e 64 | 6f 77 74 6f 70 2b 31 28 |a0),wind|owtop+1(|
|000018e0| 61 35 29 20 2a 20 50 61 | 6c 6b 69 6e 20 6b 6f 72 |a5) * Pa|lkin kor|
|000018f0| 6b 65 75 73 0a 09 6d 6f | 76 65 2e 62 09 73 63 5f |keus..mo|ve.b.sc_|
|00001900| 57 42 6f 72 42 6f 74 74 | 6f 6d 28 61 30 29 2c 77 |WBorBott|om(a0),w|
|00001910| 69 6e 64 6f 77 62 6f 74 | 74 6f 6d 2b 31 28 61 35 |indowbot|tom+1(a5|
|00001920| 29 0a 09 6d 6f 76 65 2e | 62 09 73 63 5f 57 42 6f |)..move.|b.sc_WBo|
|00001930| 72 54 6f 70 28 61 30 29 | 2c 77 69 6e 64 6f 77 74 |rTop(a0)|,windowt|
|00001940| 6f 70 62 2b 31 28 61 35 | 29 0a 09 6d 6f 76 65 2e |opb+1(a5|)..move.|
|00001950| 62 09 73 63 5f 57 42 6f | 72 4c 65 66 74 28 61 30 |b.sc_WBo|rLeft(a0|
|00001960| 29 2c 77 69 6e 64 6f 77 | 6c 65 66 74 2b 31 28 61 |),window|left+1(a|
|00001970| 35 29 0a 09 6d 6f 76 65 | 2e 62 09 73 63 5f 57 42 |5)..move|.b.sc_WB|
|00001980| 6f 72 52 69 67 68 74 28 | 61 30 29 2c 77 69 6e 64 |orRight(|a0),wind|
|00001990| 6f 77 72 69 67 68 74 2b | 31 28 61 35 29 0a 0a 09 |owright+|1(a5)...|
|000019a0| 6d 6f 76 65 09 77 69 6e | 64 6f 77 74 6f 70 62 28 |move.win|dowtopb(|
|000019b0| 61 35 29 2c 64 30 0a 09 | 61 64 64 09 64 30 2c 77 |a5),d0..|add.d0,w|
|000019c0| 69 6e 64 6f 77 74 6f 70 | 28 61 35 29 0a 0a 09 73 |indowtop|(a5)...s|
|000019d0| 75 62 71 09 23 34 2c 77 | 69 6e 64 6f 77 6c 65 66 |ubq.#4,w|indowlef|
|000019e0| 74 28 61 35 29 09 09 2a | 20 73 61 61 74 74 61 61 |t(a5)..*| saattaa|
|000019f0| 20 6d 65 6e 6e e4 20 6e | 65 67 61 74 69 69 76 69 | menn. n|egatiivi|
|00001a00| 73 65 6b 73 69 0a 09 73 | 75 62 71 09 23 34 2c 77 |seksi..s|ubq.#4,w|
|00001a10| 69 6e 64 6f 77 72 69 67 | 68 74 28 61 35 29 0a 09 |indowrig|ht(a5)..|
|00001a20| 73 75 62 71 09 23 32 2c | 77 69 6e 64 6f 77 74 6f |subq.#2,|windowto|
|00001a30| 70 28 61 35 29 0a 09 73 | 75 62 71 09 23 32 2c 77 |p(a5)..s|ubq.#2,w|
|00001a40| 69 6e 64 6f 77 62 6f 74 | 74 6f 6d 28 61 35 29 0a |indowbot|tom(a5).|
|00001a50| 0a 09 73 75 62 09 23 31 | 30 2c 77 69 6e 64 6f 77 |..sub.#1|0,window|
|00001a60| 74 6f 70 28 61 35 29 0a | 09 62 70 6c 2e 62 09 2e |top(a5).|.bpl.b..|
|00001a70| 6f 0a 09 63 6c 72 09 77 | 69 6e 64 6f 77 74 6f 70 |o..clr.w|indowtop|
|00001a80| 28 61 35 29 0a 2e 6f 0a | 09 6d 6f 76 65 09 77 69 |(a5)..o.|.move.wi|
|00001a90| 6e 64 6f 77 74 6f 70 28 | 61 35 29 2c 64 30 09 2a |ndowtop(|a5),d0.*|
|00001aa0| 20 41 64 6a 75 73 74 20 | 74 68 65 20 77 69 6e 64 | Adjust |the wind|
|00001ab0| 6f 77 20 73 69 7a 65 0a | 09 61 64 64 09 64 30 2c |ow size.|.add.d0,|
|00001ac0| 77 69 6e 73 74 72 75 63 | 2b 6e 77 5f 48 65 69 67 |winstruc|+nw_Heig|
|00001ad0| 68 74 0a 09 6d 6f 76 65 | 09 77 69 6e 64 6f 77 6c |ht..move|.windowl|
|00001ae0| 65 66 74 28 61 35 29 2c | 64 31 0a 09 61 64 64 09 |eft(a5),|d1..add.|
|00001af0| 64 31 2c 77 69 6e 73 74 | 72 75 63 2b 6e 77 5f 57 |d1,winst|ruc+nw_W|
|00001b00| 69 64 74 68 0a 09 6d 6f | 76 65 09 77 69 6e 64 6f |idth..mo|ve.windo|
|00001b10| 77 62 6f 74 74 6f 6d 28 | 61 35 29 2c 64 33 0a 09 |wbottom(|a5),d3..|
|00001b20| 61 64 64 09 64 33 2c 77 | 69 6e 73 74 72 75 63 2b |add.d3,w|instruc+|
|00001b30| 6e 77 5f 48 65 69 67 68 | 74 0a 0a 09 6d 6f 76 65 |nw_Heigh|t...move|
|00001b40| 2e 6c 09 64 37 2c 61 31 | 09 09 09 2a 20 55 6e 6c |.l.d7,a1|...* Unl|
|00001b50| 6f 63 6b 20 69 74 2e 20 | 4c 65 74 27 73 20 68 6f |ock it. |Let's ho|
|00001b60| 70 65 20 69 74 20 64 6f | 65 73 6e 27 74 0a 09 73 |pe it do|esn't..s|
|00001b70| 75 62 2e 6c 09 61 30 2c | 61 30 09 09 09 2a 20 67 |ub.l.a0,|a0...* g|
|00001b80| 6f 20 61 6e 79 77 68 65 | 72 65 20 62 65 66 6f 72 |o anywhe|re befor|
|00001b90| 65 20 77 65 20 6f 70 65 | 6e 20 6f 75 72 0a 09 6c |e we ope|n our..l|
|00001ba0| 6f 62 09 55 6e 6c 6f 63 | 6b 50 75 62 53 63 72 65 |ob.Unloc|kPubScre|
|00001bb0| 65 6e 09 09 2a 20 77 69 | 6e 64 6f 77 20 3b 2d 29 |en..* wi|ndow ;-)|
|00001bc0| 0a 09 72 74 73 0a 0a 0a | 2a 2a 20 62 65 76 65 6c |..rts...|** bevel|
|00001bd0| 62 6f 6b 73 69 74 2c 20 | 72 65 75 6e 61 74 20 6b |boksit, |reunat k|
|00001be0| 61 6b 73 20 70 69 78 65 | 6c 69 e4 0a 0a 6c 61 61 |aks pixe|li...laa|
|00001bf0| 74 69 6b 6b 6f 31 0a 09 | 6d 6f 76 65 71 09 23 31 |tikko1..|moveq.#1|
|00001c00| 2c 64 33 0a 09 6d 6f 76 | 65 71 09 23 32 2c 64 32 |,d3..mov|eq.#2,d2|
|00001c10| 0a 0a 09 6d 6f 76 65 2e | 6c 09 61 31 2c 61 33 0a |...move.|l.a1,a3.|
|00001c20| 09 6d 6f 76 65 09 64 32 | 2c 61 34 0a 09 6d 6f 76 |.move.d2|,a4..mov|
|00001c30| 65 09 64 33 2c 61 32 0a | 0a 2a 2a 20 76 61 6c 6b |e.d3,a2.|.** valk|
|00001c40| 6f 73 65 74 20 72 65 75 | 6e 61 74 0a 0a 09 6d 6f |oset reu|nat...mo|
|00001c50| 76 65 09 61 32 2c 64 30 | 0a 09 6d 6f 76 65 2e 6c |ve.a2,d0|..move.l|
|00001c60| 09 61 33 2c 61 31 0a 09 | 6c 6f 72 65 09 47 46 58 |.a3,a1..|lore.GFX|
|00001c70| 2c 53 65 74 41 50 65 6e | 0a 0a 09 6d 6f 76 65 09 |,SetAPen|...move.|
|00001c80| 70 6c 78 32 2c 64 30 09 | 09 2a 20 78 31 0a 09 73 |plx2,d0.|.* x1..s|
|00001c90| 75 62 71 09 23 31 2c 64 | 30 09 09 0a 09 6d 6f 76 |ubq.#1,d|0....mov|
|00001ca0| 65 09 70 6c 79 31 2c 64 | 31 09 09 2a 20 79 31 0a |e.ply1,d|1..* y1.|
|00001cb0| 09 6d 6f 76 65 09 70 6c | 78 31 2c 64 32 09 09 2a |.move.pl|x1,d2..*|
|00001cc0| 20 78 32 0a 09 6d 6f 76 | 65 09 70 6c 79 31 2c 64 | x2..mov|e.ply1,d|
|00001cd0| 33 09 09 2a 20 79 32 0a | 09 62 73 72 2e 77 09 64 |3..* y2.|.bsr.w.d|
|00001ce0| 72 61 77 6c 69 0a 0a 09 | 6d 6f 76 65 09 70 6c 78 |rawli...|move.plx|
|00001cf0| 31 2c 64 30 09 09 2a 20 | 78 31 0a 09 6d 6f 76 65 |1,d0..* |x1..move|
|00001d00| 09 70 6c 79 31 2c 64 31 | 09 09 2a 20 79 31 0a 09 |.ply1,d1|..* y1..|
|00001d10| 6d 6f 76 65 09 70 6c 78 | 31 2c 64 32 0a 09 61 64 |move.plx|1,d2..ad|
|00001d20| 64 71 09 23 31 2c 64 32 | 0a 09 6d 6f 76 65 09 70 |dq.#1,d2|..move.p|
|00001d30| 6c 79 32 2c 64 33 0a 09 | 62 73 72 2e 77 09 64 72 |ly2,d3..|bsr.w.dr|
|00001d40| 61 77 6c 69 0a 09 0a 2a | 2a 20 6d 75 73 74 61 74 |awli...*|* mustat|
|00001d50| 20 72 65 75 6e 61 74 0a | 0a 09 6d 6f 76 65 09 61 | reunat.|..move.a|
|00001d60| 34 2c 64 30 0a 09 6d 6f | 76 65 2e 6c 09 61 33 2c |4,d0..mo|ve.l.a3,|
|00001d70| 61 31 0a 09 6c 6f 62 09 | 53 65 74 41 50 65 6e 0a |a1..lob.|SetAPen.|
|00001d80| 0a 09 6d 6f 76 65 09 70 | 6c 78 31 2c 64 30 0a 09 |..move.p|lx1,d0..|
|00001d90| 61 64 64 71 09 23 31 2c | 64 30 0a 09 6d 6f 76 65 |addq.#1,|d0..move|
|00001da0| 09 70 6c 79 32 2c 64 31 | 0a 09 6d 6f 76 65 09 70 |.ply2,d1|..move.p|
|00001db0| 6c 78 32 2c 64 32 0a 09 | 6d 6f 76 65 09 70 6c 79 |lx2,d2..|move.ply|
|00001dc0| 32 2c 64 33 0a 09 62 73 | 72 2e 62 09 64 72 61 77 |2,d3..bs|r.b.draw|
|00001dd0| 6c 69 0a 0a 09 6d 6f 76 | 65 09 70 6c 78 32 2c 64 |li...mov|e.plx2,d|
|00001de0| 30 0a 09 6d 6f 76 65 09 | 70 6c 79 32 2c 64 31 0a |0..move.|ply2,d1.|
|00001df0| 09 6d 6f 76 65 09 70 6c | 78 32 2c 64 32 0a 09 6d |.move.pl|x2,d2..m|
|00001e00| 6f 76 65 09 70 6c 79 31 | 2c 64 33 0a 09 62 73 72 |ove.ply1|,d3..bsr|
|00001e10| 2e 62 09 64 72 61 77 6c | 69 0a 0a 09 6d 6f 76 65 |.b.drawl|i...move|
|00001e20| 09 70 6c 78 32 2c 64 30 | 0a 09 73 75 62 71 09 23 |.plx2,d0|..subq.#|
|00001e30| 31 2c 64 30 0a 09 6d 6f | 76 65 09 70 6c 79 31 2c |1,d0..mo|ve.ply1,|
|00001e40| 64 31 0a 09 61 64 64 71 | 09 23 31 2c 64 31 0a 09 |d1..addq|.#1,d1..|
|00001e50| 6d 6f 76 65 09 70 6c 78 | 32 2c 64 32 0a 09 73 75 |move.plx|2,d2..su|
|00001e60| 62 71 09 23 31 2c 64 32 | 0a 09 6d 6f 76 65 09 70 |bq.#1,d2|..move.p|
|00001e70| 6c 79 32 2c 64 33 0a 09 | 62 73 72 2e 62 09 64 72 |ly2,d3..|bsr.b.dr|
|00001e80| 61 77 6c 69 0a 0a 6c 6f | 6f 65 78 09 6d 6f 76 65 |awli..lo|oex.move|
|00001e90| 71 09 23 31 2c 64 30 0a | 09 6d 6f 76 65 2e 6c 09 |q.#1,d0.|.move.l.|
|00001ea0| 61 33 2c 61 31 0a 09 6a | 6d 70 09 5f 4c 56 4f 53 |a3,a1..j|mp._LVOS|
|00001eb0| 65 74 41 50 65 6e 28 61 | 36 29 0a 0a 0a 0a 64 72 |etAPen(a|6)....dr|
|00001ec0| 61 77 6c 69 09 63 6d 70 | 09 64 30 2c 64 32 0a 09 |awli.cmp|.d0,d2..|
|00001ed0| 62 68 69 2e 62 09 2e 65 | 0a 09 65 78 67 09 64 30 |bhi.b..e|..exg.d0|
|00001ee0| 2c 64 32 0a 2e 65 09 63 | 6d 70 09 64 31 2c 64 33 |,d2..e.c|mp.d1,d3|
|00001ef0| 0a 09 62 68 69 2e 62 09 | 2e 78 0a 09 65 78 67 09 |..bhi.b.|.x..exg.|
|00001f00| 64 31 2c 64 33 0a 2e 78 | 09 6d 6f 76 65 2e 6c 09 |d1,d3..x|.move.l.|
|00001f10| 61 33 2c 61 31 0a 09 6d | 6f 76 65 2e 6c 09 5f 47 |a3,a1..m|ove.l._G|
|00001f20| 46 58 42 61 73 65 28 61 | 35 29 2c 61 36 0a 09 6a |FXBase(a|5),a6..j|
|00001f30| 6d 70 09 5f 4c 56 4f 52 | 65 63 74 46 69 6c 6c 28 |mp._LVOR|ectFill(|
|00001f40| 61 36 29 0a 0a 0a 0a 0a | 2a 2a 2a 20 44 69 73 70 |a6).....|*** Disp|
|00001f50| 6c 61 79 20 74 68 65 20 | 73 63 6f 70 65 0a 0a 2a |lay the |scope..*|
|00001f60| 20 49 20 68 61 76 65 20 | 74 77 6f 20 62 75 66 66 | I have |two buff|
|00001f70| 65 72 73 2c 20 6f 6e 65 | 20 66 6f 72 20 64 72 61 |ers, one| for dra|
|00001f80| 77 69 6e 67 20 61 6e 64 | 20 6f 6e 65 20 66 6f 72 |wing and| one for|
|00001f90| 20 63 6c 65 61 72 69 6e | 67 2e 0a 2a 20 43 6c 65 | clearin|g..* Cle|
|00001fa0| 61 72 69 6e 67 20 69 73 | 20 64 6f 6e 65 20 77 69 |aring is| done wi|
|00001fb0| 74 68 20 62 6c 69 74 74 | 65 72 20 64 75 72 69 6e |th blitt|er durin|
|00001fc0| 67 20 77 68 69 63 68 20 | 63 70 75 20 64 72 61 77 |g which |cpu draw|
|00001fd0| 73 20 69 6e 74 6f 20 74 | 68 65 20 6f 74 68 65 72 |s into t|he other|
|00001fe0| 0a 2a 20 62 75 66 66 65 | 72 2e 20 54 68 65 20 64 |.* buffe|r. The d|
|00001ff0| 72 61 77 6e 20 62 75 66 | 66 65 72 20 69 73 20 74 |rawn buf|fer is t|
|00002000| 68 65 6e 20 64 75 6d 70 | 65 64 20 69 6e 74 6f 20 |hen dump|ed into |
|00002010| 74 68 65 20 77 69 6e 64 | 6f 77 20 75 73 69 6e 67 |the wind|ow using|
|00002020| 0a 2a 20 42 6c 74 42 69 | 74 4d 61 70 52 61 73 74 |.* BltBi|tMapRast|
|00002030| 50 6f 72 74 28 29 2e 0a | 0a 64 75 6e 67 0a 09 6d |Port()..|.dung..m|
|00002040| 6f 76 65 2e 6c 09 5f 47 | 46 58 42 61 73 65 28 61 |ove.l._G|FXBase(a|
|00002050| 35 29 2c 61 36 09 09 2a | 20 47 72 61 62 20 74 68 |5),a6..*| Grab th|
|00002060| 65 20 62 6c 69 74 74 65 | 72 0a 09 6c 6f 62 09 4f |e blitte|r..lob.O|
|00002070| 77 6e 42 6c 69 74 74 65 | 72 0a 09 6c 6f 62 09 57 |wnBlitte|r..lob.W|
|00002080| 61 69 74 42 6c 69 74 0a | 0a 09 6d 6f 76 65 2e 6c |aitBlit.|..move.l|
|00002090| 09 64 72 61 77 32 28 61 | 35 29 2c 24 64 66 66 30 |.draw2(a|5),$dff0|
|000020a0| 35 34 09 2a 20 43 6c 65 | 61 72 20 74 68 65 20 64 |54.* Cle|ar the d|
|000020b0| 72 61 77 69 6e 67 20 61 | 72 65 61 0a 09 6d 6f 76 |rawing a|rea..mov|
|000020c0| 65 09 23 30 2c 24 64 66 | 66 30 36 36 0a 09 6d 6f |e.#0,$df|f066..mo|
|000020d0| 76 65 2e 6c 09 23 24 30 | 31 30 30 30 30 30 30 2c |ve.l.#$0|1000000,|
|000020e0| 24 64 66 66 30 34 30 0a | 09 6d 6f 76 65 09 23 48 |$dff040.|.move.#H|
|000020f0| 45 49 47 48 54 2a 36 34 | 2b 57 49 44 54 48 2f 31 |EIGHT*64|+WIDTH/1|
|00002100| 36 2c 24 64 66 66 30 35 | 38 0a 0a 09 6c 6f 62 09 |6,$dff05|8...lob.|
|00002110| 44 69 73 6f 77 6e 42 6c | 69 74 74 65 72 09 09 2a |DisownBl|itter..*|
|00002120| 20 46 72 65 65 20 74 68 | 65 20 62 6c 69 74 74 65 | Free th|e blitte|
|00002130| 72 0a 0a 09 70 75 73 68 | 6d 09 61 6c 6c 0a 09 6d |r...push|m.all..m|
|00002140| 6f 76 65 2e 6c 09 70 6f | 72 74 28 61 35 29 2c 61 |ove.l.po|rt(a5),a|
|00002150| 30 0a 09 63 6d 70 2e 62 | 09 23 33 33 2c 68 69 70 |0..cmp.b|.#33,hip|
|00002160| 5f 70 6c 61 79 65 72 74 | 79 70 65 28 61 30 29 09 |_playert|ype(a0).|
|00002170| 2a 20 50 72 6f 74 72 61 | 63 6b 65 72 3f 0a 09 62 |* Protra|cker?..b|
|00002180| 65 71 2e 62 09 2e 31 0a | 09 63 6d 70 2e 62 09 23 |eq.b..1.|.cmp.b.#|
|00002190| 34 39 2c 68 69 70 5f 70 | 6c 61 79 65 72 74 79 70 |49,hip_p|layertyp|
|000021a0| 65 28 61 30 29 09 2a 20 | 50 53 33 4d 3f 0a 09 62 |e(a0).* |PS3M?..b|
|000021b0| 65 71 2e 62 09 2e 32 0a | 09 62 72 61 2e 62 09 2e |eq.b..2.|.bra.b..|
|000021c0| 33 0a 2e 31 09 62 73 72 | 2e 62 09 71 75 61 64 72 |3..1.bsr|.b.quadr|
|000021d0| 61 73 63 6f 70 65 09 09 | 2a 20 51 75 61 64 72 61 |ascope..|* Quadra|
|000021e0| 73 63 6f 70 65 20 66 6f | 72 20 50 54 0a 09 62 72 |scope fo|r PT..br|
|000021f0| 61 2e 62 09 2e 33 0a 2e | 32 09 62 73 72 2e 77 09 |a.b..3..|2.bsr.w.|
|00002200| 6d 75 6c 74 69 73 63 6f | 70 65 09 09 2a 20 53 74 |multisco|pe..* St|
|00002210| 65 72 65 6f 73 63 6f 70 | 65 20 66 6f 72 20 50 53 |ereoscop|e for PS|
|00002220| 33 4d 0a 2e 33 09 70 6f | 70 6d 09 61 6c 6c 0a 0a |3M..3.po|pm.all..|
|00002230| 09 6d 6f 76 65 6d 2e 6c | 09 64 72 61 77 31 28 61 |.movem.l|.draw1(a|
|00002240| 35 29 2c 64 30 2f 64 31 | 09 09 2a 20 53 77 69 74 |5),d0/d1|..* Swit|
|00002250| 63 68 20 74 68 65 20 62 | 75 66 66 65 72 73 0a 09 |ch the b|uffers..|
|00002260| 65 78 67 09 64 30 2c 64 | 31 0a 09 6d 6f 76 65 6d |exg.d0,d|1..movem|
|00002270| 2e 6c 09 64 30 2f 64 31 | 2c 64 72 61 77 31 28 61 |.l.d0/d1|,draw1(a|
|00002280| 35 29 0a 0a 09 6c 65 61 | 09 6f 6d 61 62 69 74 6d |5)...lea|.omabitm|
|00002290| 61 70 28 61 35 29 2c 61 | 30 09 2a 20 53 65 74 20 |ap(a5),a|0.* Set |
|000022a0| 74 68 65 20 62 69 74 70 | 6c 61 6e 65 20 70 6f 69 |the bitp|lane poi|
|000022b0| 6e 74 65 72 0a 09 6d 6f | 76 65 2e 6c 09 64 31 2c |nter..mo|ve.l.d1,|
|000022c0| 62 6d 5f 50 6c 61 6e 65 | 73 28 61 30 29 0a 0a 3b |bm_Plane|s(a0)..;|
|000022d0| 09 6c 65 61 09 6f 6d 61 | 62 69 74 6d 61 70 28 61 |.lea.oma|bitmap(a|
|000022e0| 35 29 2c 61 30 09 2a 20 | 43 6f 70 79 20 66 72 6f |5),a0.* |Copy fro|
|000022f0| 6d 20 62 69 74 6d 61 70 | 20 74 6f 20 72 61 73 74 |m bitmap| to rast|
|00002300| 70 6f 72 74 0a 09 6d 6f | 76 65 2e 6c 09 72 61 73 |port..mo|ve.l.ras|
|00002310| 74 70 6f 72 74 28 61 35 | 29 2c 61 31 0a 09 6d 6f |tport(a5|),a1..mo|
|00002320| 76 65 71 09 23 30 2c 64 | 30 09 09 2a 20 73 6f 75 |veq.#0,d|0..* sou|
|00002330| 72 63 65 20 78 2c 79 0a | 09 6d 6f 76 65 71 09 23 |rce x,y.|.moveq.#|
|00002340| 30 2c 64 31 0a 09 6d 6f | 76 65 71 09 23 31 30 2c |0,d1..mo|veq.#10,|
|00002350| 64 32 09 09 2a 20 64 65 | 73 74 20 78 2c 79 0a 09 |d2..* de|st x,y..|
|00002360| 6d 6f 76 65 71 09 23 31 | 35 2c 64 33 0a 09 61 64 |moveq.#1|5,d3..ad|
|00002370| 64 09 77 69 6e 64 6f 77 | 6c 65 66 74 28 61 35 29 |d.window|left(a5)|
|00002380| 2c 64 32 0a 09 61 64 64 | 09 77 69 6e 64 6f 77 74 |,d2..add|.windowt|
|00002390| 6f 70 28 61 35 29 2c 64 | 33 0a 09 6d 6f 76 65 09 |op(a5),d|3..move.|
|000023a0| 23 24 63 30 2c 64 36 09 | 09 2a 20 6d 69 6e 74 65 |#$c0,d6.|.* minte|
|000023b0| 72 6d 20 61 2d 3e 64 0a | 09 6d 6f 76 65 09 23 57 |rm a->d.|.move.#W|
|000023c0| 49 44 54 48 2c 64 34 09 | 2a 20 78 2d 73 69 7a 65 |IDTH,d4.|* x-size|
|000023d0| 0a 09 6d 6f 76 65 09 23 | 48 45 49 47 48 54 2c 64 |..move.#|HEIGHT,d|
|000023e0| 35 09 2a 20 79 2d 73 69 | 7a 65 0a 09 6c 6f 72 65 |5.* y-si|ze..lore|
|000023f0| 09 47 46 58 2c 42 6c 74 | 42 69 74 4d 61 70 52 61 |.GFX,Blt|BitMapRa|
|00002400| 73 74 50 6f 72 74 09 2a | 20 5a 77 6f 6f 73 68 21 |stPort.*| Zwoosh!|
|00002410| 0a 09 72 74 73 0a 0a 2a | 2a 2a 20 51 75 61 72 61 |..rts..*|** Quara|
|00002420| 73 63 6f 70 65 20 72 6f | 75 74 69 6e 65 20 66 6f |scope ro|utine fo|
|00002430| 72 20 50 72 6f 74 72 61 | 63 6b 65 72 0a 0a 2a 20 |r Protra|cker..* |
|00002440| 54 68 69 73 20 28 61 6e | 64 20 74 68 65 20 73 74 |This (an|d the st|
|00002450| 65 72 65 6f 73 63 6f 70 | 65 29 20 61 72 65 20 76 |ereoscop|e) are v|
|00002460| 65 72 79 20 75 6e 6f 70 | 74 69 6d 69 7a 65 64 2e |ery unop|timized.|
|00002470| 20 54 68 65 20 72 65 61 | 73 6f 6e 20 66 6f 72 20 | The rea|son for |
|00002480| 74 68 69 73 20 69 73 0a | 2a 20 74 68 61 74 20 75 |this is.|* that u|
|00002490| 6e 6f 70 74 69 6d 69 7a | 65 64 20 63 6f 64 65 20 |noptimiz|ed code |
|000024a0| 69 73 20 75 73 75 61 6c | 6c 79 20 65 61 73 69 65 |is usual|ly easie|
|000024b0| 72 20 74 6f 20 75 6e 64 | 65 72 73 74 61 6e 64 20 |r to und|erstand |
|000024c0| 74 68 61 6e 20 6f 70 74 | 69 6d 69 7a 65 64 20 63 |than opt|imized c|
|000024d0| 6f 64 65 2e 0a 2a 20 41 | 6c 73 6f 20 74 68 69 73 |ode..* A|lso this|
|000024e0| 20 6c 65 61 76 65 73 20 | 61 20 63 65 72 74 61 69 | leaves |a certai|
|000024f0| 6e 20 63 68 61 6c 6c 65 | 6e 67 65 20 66 6f 72 20 |n challe|nge for |
|00002500| 63 6f 64 65 72 73 20 74 | 6f 20 74 72 79 20 74 6f |coders t|o try to|
|00002510| 20 67 65 74 20 74 68 65 | 20 6c 6f 6f 70 0a 2a 20 | get the| loop.* |
|00002520| 61 73 20 66 61 73 74 20 | 61 73 20 70 6f 73 73 69 |as fast |as possi|
|00002530| 62 6c 65 2e 0a 0a 71 75 | 61 64 72 61 73 63 6f 70 |ble...qu|adrascop|
|00002540| 65 0a 09 6d 6f 76 65 2e | 6c 09 70 6f 72 74 28 61 |e..move.|l.port(a|
|00002550| 35 29 2c 61 33 0a 09 6d | 6f 76 65 2e 6c 09 68 69 |5),a3..m|ove.l.hi|
|00002560| 70 5f 50 54 63 68 31 28 | 61 33 29 2c 61 33 09 2a |p_PTch1(|a3),a3.*|
|00002570| 20 43 68 61 6e 6e 65 6c | 20 31 20 64 61 74 61 0a | Channel| 1 data.|
|00002580| 09 6d 6f 76 65 2e 6c 09 | 64 72 61 77 31 28 61 35 |.move.l.|draw1(a5|
|00002590| 29 2c 61 30 09 09 0a 09 | 62 73 72 2e 62 09 2e 73 |),a0....|bsr.b..s|
|000025a0| 63 6f 70 65 0a 0a 2a 20 | 57 49 44 54 48 2f 38 2f |cope..* |WIDTH/8/|
|000025b0| 34 20 3d 20 31 30 0a 0a | 09 6d 6f 76 65 2e 6c 09 |4 = 10..|.move.l.|
|000025c0| 70 6f 72 74 28 61 35 29 | 2c 61 33 0a 09 6d 6f 76 |port(a5)|,a3..mov|
|000025d0| 65 2e 6c 09 68 69 70 5f | 50 54 63 68 32 28 61 33 |e.l.hip_|PTch2(a3|
|000025e0| 29 2c 61 33 0a 09 6d 6f | 76 65 2e 6c 09 64 72 61 |),a3..mo|ve.l.dra|
|000025f0| 77 31 28 61 35 29 2c 61 | 30 0a 09 6c 65 61 09 31 |w1(a5),a|0..lea.1|
|00002600| 30 28 61 30 29 2c 61 30 | 09 09 2a 20 50 6f 73 69 |0(a0),a0|..* Posi|
|00002610| 74 69 6f 6e 0a 09 62 73 | 72 2e 62 09 2e 73 63 6f |tion..bs|r.b..sco|
|00002620| 70 65 0a 0a 09 6d 6f 76 | 65 2e 6c 09 70 6f 72 74 |pe...mov|e.l.port|
|00002630| 28 61 35 29 2c 61 33 0a | 09 6d 6f 76 65 2e 6c 09 |(a5),a3.|.move.l.|
|00002640| 68 69 70 5f 50 54 63 68 | 33 28 61 33 29 2c 61 33 |hip_PTch|3(a3),a3|
|00002650| 0a 09 6d 6f 76 65 2e 6c | 09 64 72 61 77 31 28 61 |..move.l|.draw1(a|
|00002660| 35 29 2c 61 30 0a 09 6c | 65 61 09 31 30 2b 31 30 |5),a0..l|ea.10+10|
|00002670| 28 61 30 29 2c 61 30 0a | 09 62 73 72 2e 62 09 2e |(a0),a0.|.bsr.b..|
|00002680| 73 63 6f 70 65 0a 0a 09 | 6d 6f 76 65 2e 6c 09 70 |scope...|move.l.p|
|00002690| 6f 72 74 28 61 35 29 2c | 61 33 0a 09 6d 6f 76 65 |ort(a5),|a3..move|
|000026a0| 2e 6c 09 68 69 70 5f 50 | 54 63 68 34 28 61 33 29 |.l.hip_P|Tch4(a3)|
|000026b0| 2c 61 33 0a 09 6d 6f 76 | 65 2e 6c 09 64 72 61 77 |,a3..mov|e.l.draw|
|000026c0| 31 28 61 35 29 2c 61 30 | 0a 09 6c 65 61 09 31 30 |1(a5),a0|..lea.10|
|000026d0| 2b 31 30 2b 31 30 28 61 | 30 29 2c 61 30 0a 09 62 |+10+10(a|0),a0..b|
|000026e0| 73 72 2e 62 09 2e 73 63 | 6f 70 65 0a 09 72 74 73 |sr.b..sc|ope..rts|
|000026f0| 0a 0a 2e 73 63 6f 70 65 | 0a 09 74 73 74 2e 6c 09 |...scope|..tst.l.|
|00002700| 50 54 63 68 5f 6c 6f 6f | 70 73 74 61 72 74 28 61 |PTch_loo|pstart(a|
|00002710| 33 29 09 2a 20 41 6c 77 | 61 79 73 20 63 68 65 63 |3).* Alw|ays chec|
|00002720| 6b 20 74 68 65 73 65 20 | 74 6f 20 61 76 6f 69 64 |k these |to avoid|
|00002730| 0a 09 62 65 71 2e 62 09 | 2e 68 61 6c 74 09 09 09 |..beq.b.|.halt...|
|00002740| 2a 20 65 6e 66 6f 72 63 | 65 72 20 68 69 74 73 21 |* enforc|er hits!|
|00002750| 0a 09 6d 6f 76 65 2e 6c | 09 50 54 63 68 5f 73 74 |..move.l|.PTch_st|
|00002760| 61 72 74 28 61 33 29 2c | 64 30 0a 09 62 6e 65 2e |art(a3),|d0..bne.|
|00002770| 62 09 2e 6a 6f 6c 74 0a | 2e 68 61 6c 74 09 72 74 |b..jolt.|.halt.rt|
|00002780| 73 0a 0a 2e 6a 6f 6c 74 | 09 0a 09 6d 6f 76 65 2e |s...jolt|...move.|
|00002790| 6c 09 64 30 2c 61 31 09 | 09 09 09 2a 20 53 61 6d |l.d0,a1.|...* Sam|
|000027a0| 70 6c 65 20 73 74 61 72 | 74 0a 09 6d 6f 76 65 09 |ple star|t..move.|
|000027b0| 50 54 63 68 5f 6c 65 6e | 67 74 68 28 61 33 29 2c |PTch_len|gth(a3),|
|000027c0| 64 35 09 09 2a 20 53 61 | 6d 70 6c 65 20 6c 65 6e |d5..* Sa|mple len|
|000027d0| 67 74 68 0a 0a 09 6d 6f | 76 65 2e 6c 09 70 6f 72 |gth...mo|ve.l.por|
|000027e0| 74 28 61 35 29 2c 61 32 | 09 09 2a 20 47 65 74 20 |t(a5),a2|..* Get |
|000027f0| 6d 61 69 6e 76 6f 6c 75 | 6d 65 0a 09 6d 6f 76 65 |mainvolu|me..move|
|00002800| 71 09 23 30 2c 64 31 0a | 09 6d 6f 76 65 2e 62 09 |q.#0,d1.|.move.b.|
|00002810| 68 69 70 5f 6d 61 69 6e | 76 6f 6c 75 6d 65 28 61 |hip_main|volume(a|
|00002820| 32 29 2c 64 31 09 2a 20 | 28 4d 61 69 6e 20 76 6f |2),d1.* |(Main vo|
|00002830| 6c 75 6d 65 20 2a 20 73 | 61 6d 70 6c 65 20 76 6f |lume * s|ample vo|
|00002840| 6c 75 6d 65 29 2f 36 34 | 0a 09 6d 75 6c 75 09 50 |lume)/64|..mulu.P|
|00002850| 54 63 68 5f 76 6f 6c 75 | 6d 65 28 61 33 29 2c 64 |Tch_volu|me(a3),d|
|00002860| 31 09 0a 09 6c 73 72 09 | 23 36 2c 64 31 09 09 09 |1...lsr.|#6,d1...|
|00002870| 2a 20 56 61 6c 75 65 20 | 66 6f 72 20 73 63 61 6c |* Value |for scal|
|00002880| 69 6e 67 20 74 68 65 20 | 64 61 74 61 0a 0a 09 6d |ing the |data...m|
|00002890| 6f 76 65 71 09 23 30 2c | 64 30 09 09 09 2a 20 58 |oveq.#0,|d0...* X|
|000028a0| 20 63 6f 6f 72 64 69 6e | 61 74 65 0a 09 6d 6f 76 | coordin|ate..mov|
|000028b0| 65 71 09 23 38 30 2d 31 | 2c 64 37 09 09 2a 20 4c |eq.#80-1|,d7..* L|
|000028c0| 6f 6f 70 20 63 6f 75 6e | 74 65 72 2c 20 64 6f 20 |oop coun|ter, do |
|000028d0| 38 30 20 70 69 78 65 6c | 73 0a 64 72 6c 6f 09 0a |80 pixel|s.drlo..|
|000028e0| 09 6d 6f 76 65 2e 62 09 | 28 61 31 29 2b 2c 64 32 |.move.b.|(a1)+,d2|
|000028f0| 09 09 2a 20 52 65 61 64 | 20 6f 6e 65 20 62 79 74 |..* Read| one byt|
|00002900| 65 20 73 61 6d 70 6c 65 | 20 64 61 74 61 0a 09 65 |e sample| data..e|
|00002910| 78 74 09 64 32 09 09 09 | 2a 20 53 69 67 6e 20 65 |xt.d2...|* Sign e|
|00002920| 78 74 65 6e 64 20 74 6f | 20 77 6f 72 64 0a 09 6d |xtend to| word..m|
|00002930| 75 6c 73 09 64 31 2c 64 | 32 09 09 09 2a 20 53 63 |uls.d1,d|2...* Sc|
|00002940| 61 6c 65 20 61 63 63 6f | 72 64 69 6e 67 20 74 6f |ale acco|rding to|
|00002950| 20 76 6f 6c 75 6d 65 0a | 09 61 73 72 09 23 36 2c | volume.|.asr.#6,|
|00002960| 64 32 09 09 09 2a 20 2e | 2e 2e 0a 09 61 64 64 09 |d2...* .|....add.|
|00002970| 23 24 38 30 2c 64 32 09 | 09 09 2a 20 43 68 61 6e |#$80,d2.|..* Chan|
|00002980| 67 65 20 74 68 65 20 73 | 69 67 6e 0a 09 61 73 72 |ge the s|ign..asr|
|00002990| 09 23 32 2c 64 32 09 09 | 09 2a 20 53 63 61 6c 65 |.#2,d2..|.* Scale|
|000029a0| 20 64 6f 77 6e 20 74 6f | 20 30 2d 36 33 0a 09 6d | down to| 0-63..m|
|000029b0| 75 6c 75 09 23 57 49 44 | 54 48 2f 38 2c 64 32 09 |ulu.#WID|TH/8,d2.|
|000029c0| 09 2a 20 47 65 74 20 59 | 20 63 6f 6f 72 64 69 6e |.* Get Y| coordin|
|000029d0| 61 74 65 20 69 6e 20 74 | 68 65 20 62 69 74 70 6c |ate in t|he bitpl|
|000029e0| 61 6e 65 0a 0a 09 6d 6f | 76 65 09 64 30 2c 64 34 |ane...mo|ve.d0,d4|
|000029f0| 09 09 09 2a 20 58 0a 09 | 6d 6f 76 65 09 64 30 2c |...* X..|move.d0,|
|00002a00| 64 33 0a 09 6c 73 72 09 | 23 33 2c 64 34 09 09 09 |d3..lsr.|#3,d4...|
|00002a10| 2a 20 58 20 6f 66 66 73 | 65 74 20 69 6e 20 62 79 |* X offs|et in by|
|00002a20| 74 65 73 20 3d 20 78 2d | 63 6f 6f 72 64 2f 38 0a |tes = x-|coord/8.|
|00002a30| 09 61 64 64 09 64 34 2c | 64 32 09 09 09 2a 20 41 |.add.d4,|d2...* A|
|00002a40| 64 64 20 74 6f 20 59 0a | 09 6e 6f 74 09 64 33 09 |dd to Y.|.not.d3.|
|00002a50| 09 09 2a 20 50 6c 6f 74 | 20 70 69 78 65 6c 0a 09 |..* Plot| pixel..|
|00002a60| 62 73 65 74 09 64 33 2c | 28 61 30 2c 64 32 29 09 |bset.d3,|(a0,d2).|
|00002a70| 09 2a 20 2e 2e 2e 0a 0a | 09 73 75 62 71 09 23 31 |.* .....|.subq.#1|
|00002a80| 2c 64 35 09 09 09 2a 20 | 53 75 62 74 72 61 63 74 |,d5...* |Subtract|
|00002a90| 20 73 61 6d 70 6c 65 20 | 6c 65 6e 67 74 68 0a 09 | sample |length..|
|00002aa0| 62 70 6c 2e 62 09 2e 6c | 09 09 09 2a 20 73 61 6d |bpl.b..l|...* sam|
|00002ab0| 70 6c 65 20 65 6e 64 3f | 0a 09 6d 6f 76 65 09 50 |ple end?|..move.P|
|00002ac0| 54 63 68 5f 72 65 70 6c | 65 6e 28 61 33 29 2c 64 |Tch_repl|en(a3),d|
|00002ad0| 35 09 2a 20 47 65 74 20 | 76 61 6c 75 65 73 20 66 |5.* Get |values f|
|00002ae0| 6f 72 20 6c 6f 6f 70 0a | 09 6d 6f 76 65 2e 6c 09 |or loop.|.move.l.|
|00002af0| 50 54 63 68 5f 6c 6f 6f | 70 73 74 61 72 74 28 61 |PTch_loo|pstart(a|
|00002b00| 33 29 2c 61 31 0a 2e 6c | 0a 09 61 64 64 71 09 23 |3),a1..l|..addq.#|
|00002b10| 31 2c 64 30 09 09 2a 20 | 49 6e 63 72 65 61 73 65 |1,d0..* |Increase|
|00002b20| 20 58 0a 0a 09 64 62 66 | 09 64 37 2c 64 72 6c 6f | X...dbf|.d7,drlo|
|00002b30| 09 09 2a 20 4c 6f 6f 70 | 2e 2e 0a 09 72 74 73 0a |..* Loop|....rts.|
|00002b40| 0a 0a 0a 2a 2a 2a 20 53 | 74 65 72 65 6f 73 63 6f |...*** S|tereosco|
|00002b50| 70 65 20 66 6f 72 20 50 | 53 33 4d 0a 0a 6d 75 6c |pe for P|S3M..mul|
|00002b60| 74 69 73 63 6f 70 65 0a | 09 6d 6f 76 65 2e 6c 09 |tiscope.|.move.l.|
|00002b70| 70 6f 72 74 28 61 35 29 | 2c 61 31 0a 09 6d 6f 76 |port(a5)|,a1..mov|
|00002b80| 65 2e 6c 09 68 69 70 5f | 70 73 33 6d 6c 65 66 74 |e.l.hip_|ps3mleft|
|00002b90| 28 61 31 29 2c 61 31 0a | 09 6d 6f 76 65 2e 6c 09 |(a1),a1.|.move.l.|
|00002ba0| 64 72 61 77 31 28 61 35 | 29 2c 61 30 0a 09 62 73 |draw1(a5|),a0..bs|
|00002bb0| 72 2e 62 09 2e 68 0a 0a | 09 6d 6f 76 65 2e 6c 09 |r.b..h..|.move.l.|
|00002bc0| 70 6f 72 74 28 61 35 29 | 2c 61 31 0a 09 6d 6f 76 |port(a5)|,a1..mov|
|00002bd0| 65 2e 6c 09 68 69 70 5f | 70 73 33 6d 72 69 67 68 |e.l.hip_|ps3mrigh|
|00002be0| 74 28 61 31 29 2c 61 31 | 0a 09 6d 6f 76 65 2e 6c |t(a1),a1|..move.l|
|00002bf0| 09 64 72 61 77 31 28 61 | 35 29 2c 61 30 0a 09 6c |.draw1(a|5),a0..l|
|00002c00| 65 61 09 57 49 44 54 48 | 2f 38 2f 32 28 61 30 29 |ea.WIDTH|/8/2(a0)|
|00002c10| 2c 61 30 0a 09 62 73 72 | 2e 62 09 2e 68 0a 09 72 |,a0..bsr|.b..h..r|
|00002c20| 74 73 0a 0a 2e 68 09 6d | 6f 76 65 2e 6c 09 70 6f |ts...h.m|ove.l.po|
|00002c30| 72 74 28 61 35 29 2c 61 | 32 0a 09 6d 6f 76 65 2e |rt(a5),a|2..move.|
|00002c40| 6c 09 68 69 70 5f 70 73 | 33 6d 6f 66 66 73 28 61 |l.hip_ps|3moffs(a|
|00002c50| 32 29 2c 64 35 09 09 2a | 20 47 65 74 20 6f 66 66 |2),d5..*| Get off|
|00002c60| 73 65 74 20 69 6e 20 62 | 75 66 66 65 72 73 0a 09 |set in b|uffers..|
|00002c70| 6d 6f 76 65 2e 6c 09 68 | 69 70 5f 70 73 33 6d 6d |move.l.h|ip_ps3mm|
|00002c80| 61 78 6f 66 66 73 28 61 | 32 29 2c 64 34 09 09 2a |axoffs(a|2),d4..*|
|00002c90| 20 47 65 74 20 6d 61 78 | 20 6f 66 66 73 65 74 0a | Get max| offset.|
|00002ca0| 09 09 0a 09 6d 6f 76 65 | 09 23 31 36 30 2d 31 2c |....move|.#160-1,|
|00002cb0| 64 37 09 09 2a 20 44 72 | 61 77 20 31 36 30 20 70 |d7..* Dr|aw 160 p|
|00002cc0| 69 78 65 6c 73 0a 09 6d | 6f 76 65 71 09 23 30 2c |ixels..m|oveq.#0,|
|00002cd0| 64 30 09 09 09 2a 20 58 | 20 63 6f 6f 72 64 0a 2e |d0...* X| coord..|
|00002ce0| 64 72 6c 6f 09 0a 09 6d | 6f 76 65 71 09 23 30 2c |drlo...m|oveq.#0,|
|00002cf0| 64 32 0a 09 6d 6f 76 65 | 2e 62 09 28 61 31 2c 64 |d2..move|.b.(a1,d|
|00002d00| 35 2e 6c 29 2c 64 32 09 | 09 2a 20 47 65 74 20 64 |5.l),d2.|.* Get d|
|00002d10| 61 74 61 20 66 72 6f 6d | 20 6d 69 78 69 6e 67 20 |ata from| mixing |
|00002d20| 62 75 66 66 65 72 0a 09 | 61 64 64 2e 62 09 23 24 |buffer..|add.b.#$|
|00002d30| 38 30 2c 64 32 0a 09 6c | 73 72 09 23 32 2c 64 32 |80,d2..l|sr.#2,d2|
|00002d40| 0a 09 6d 75 6c 75 09 23 | 57 49 44 54 48 2f 38 2c |..mulu.#|WIDTH/8,|
|00002d50| 64 32 09 09 2a 20 59 0a | 0a 09 6d 6f 76 65 09 64 |d2..* Y.|..move.d|
|00002d60| 30 2c 64 36 0a 09 6d 6f | 76 65 09 64 30 2c 64 33 |0,d6..mo|ve.d0,d3|
|00002d70| 0a 09 6c 73 72 09 23 33 | 2c 64 36 09 09 09 2a 20 |..lsr.#3|,d6...* |
|00002d80| 58 20 6f 66 66 73 65 74 | 20 69 6e 20 62 79 74 65 |X offset| in byte|
|00002d90| 73 20 3d 20 78 2d 63 6f | 6f 72 64 2f 38 0a 09 61 |s = x-co|ord/8..a|
|00002da0| 64 64 09 64 36 2c 64 32 | 09 09 09 0a 09 6e 6f 74 |dd.d6,d2|.....not|
|00002db0| 09 64 33 09 09 09 2a 20 | 50 6c 6f 74 20 70 69 78 |.d3...* |Plot pix|
|00002dc0| 65 6c 0a 09 62 73 65 74 | 09 64 33 2c 28 61 30 2c |el..bset|.d3,(a0,|
|00002dd0| 64 32 29 09 09 2a 20 2e | 2e 2e 0a 0a 09 61 64 64 |d2)..* .|.....add|
|00002de0| 71 09 23 31 2c 64 30 09 | 09 09 2a 20 49 6e 63 72 |q.#1,d0.|..* Incr|
|00002df0| 65 61 73 65 20 78 20 63 | 6f 6f 72 64 0a 09 61 64 |ease x c|oord..ad|
|00002e00| 64 71 2e 6c 09 23 31 2c | 64 35 09 09 09 2a 20 49 |dq.l.#1,|d5...* I|
|00002e10| 6e 63 72 65 61 73 65 20 | 62 75 66 66 65 72 20 70 |ncrease |buffer p|
|00002e20| 6f 73 69 74 69 6f 6e 0a | 09 61 6e 64 2e 6c 09 64 |osition.|.and.l.d|
|00002e30| 34 2c 64 35 09 09 09 2a | 20 6d 61 6b 65 20 73 75 |4,d5...*| make su|
|00002e40| 72 65 20 69 74 20 73 74 | 61 79 73 20 69 6e 20 74 |re it st|ays in t|
|00002e50| 68 65 20 62 75 66 66 65 | 72 0a 0a 09 64 62 66 09 |he buffe|r...dbf.|
|00002e60| 64 37 2c 2e 64 72 6c 6f | 09 09 2a 20 4c 6f 6f 70 |d7,.drlo|..* Loop|
|00002e70| 0a 09 72 74 73 0a 0a 0a | 0a 2a 2a 2a 2a 2a 2a 2a |..rts...|.*******|
|00002e80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002e90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002ea0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002eb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002ec0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 20 57 69 6e 64 6f |********|.* Windo|
|00002ed0| 77 0a 0a 77 66 6c 61 67 | 73 20 73 65 74 20 57 46 |w..wflag|s set WF|
|00002ee0| 4c 47 5f 53 4d 41 52 54 | 5f 52 45 46 52 45 53 48 |LG_SMART|_REFRESH|
|00002ef0| 21 57 46 4c 47 5f 44 52 | 41 47 42 41 52 21 57 46 |!WFLG_DR|AGBAR!WF|
|00002f00| 4c 47 5f 43 4c 4f 53 45 | 47 41 44 47 45 54 21 57 |LG_CLOSE|GADGET!W|
|00002f10| 46 4c 47 5f 44 45 50 54 | 48 47 41 44 47 45 54 0a |FLG_DEPT|HGADGET.|
|00002f20| 77 66 6c 61 67 73 20 73 | 65 74 20 77 66 6c 61 67 |wflags s|et wflag|
|00002f30| 73 21 57 46 4c 47 5f 52 | 4d 42 54 52 41 50 0a 69 |s!WFLG_R|MBTRAP.i|
|00002f40| 64 63 6d 70 66 6c 61 67 | 73 20 3d 20 49 44 43 4d |dcmpflag|s = IDCM|
|00002f50| 50 5f 43 4c 4f 53 45 57 | 49 4e 44 4f 57 21 49 44 |P_CLOSEW|INDOW!ID|
|00002f60| 43 4d 50 5f 4d 4f 55 53 | 45 42 55 54 54 4f 4e 53 |CMP_MOUS|EBUTTONS|
|00002f70| 0a 0a 77 69 6e 73 74 72 | 75 63 0a 09 64 63 09 31 |..winstr|uc..dc.1|
|00002f80| 31 30 2c 38 35 09 2a 20 | 78 2c 79 20 70 6f 73 69 |10,85.* |x,y posi|
|00002f90| 74 69 6f 6e 0a 77 69 6e | 73 69 7a 09 64 63 09 33 |tion.win|siz.dc.3|
|00002fa0| 34 30 2c 38 35 09 2a 20 | 78 2c 79 20 73 69 7a 65 |40,85.* |x,y size|
|00002fb0| 0a 09 64 63 2e 62 09 32 | 2c 31 09 0a 09 64 63 2e |..dc.b.2|,1...dc.|
|00002fc0| 6c 09 69 64 63 6d 70 66 | 6c 61 67 73 0a 09 64 63 |l.idcmpf|lags..dc|
|00002fd0| 2e 6c 09 77 66 6c 61 67 | 73 0a 09 64 63 2e 6c 09 |.l.wflag|s..dc.l.|
|00002fe0| 30 0a 09 64 63 2e 6c 09 | 30 09 0a 09 64 63 2e 6c |0..dc.l.|0...dc.l|
|00002ff0| 09 2e 74 09 2a 20 74 69 | 74 6c 65 0a 09 64 63 2e |..t.* ti|tle..dc.|
|00003000| 6c 09 30 0a 09 64 63 2e | 6c 09 30 09 0a 09 64 63 |l.0..dc.|l.0...dc|
|00003010| 09 30 2c 36 34 30 09 2a | 20 6d 69 6e 2f 6d 61 78 |.0,640.*| min/max|
|00003020| 20 78 0a 09 64 63 09 30 | 2c 32 35 36 09 2a 20 6d | x..dc.0|,256.* m|
|00003030| 69 6e 2f 6d 61 78 20 79 | 0a 09 64 63 09 57 42 45 |in/max y|..dc.WBE|
|00003040| 4e 43 48 53 43 52 45 45 | 4e 0a 09 64 63 2e 6c 09 |NCHSCREE|N..dc.l.|
|00003050| 30 0a 0a 2e 74 09 64 63 | 2e 62 09 22 45 78 61 6d |0...t.dc|.b."Exam|
|00003060| 70 6c 65 20 73 63 6f 70 | 65 22 2c 30 0a 0a 69 6e |ple scop|e",0..in|
|00003070| 74 75 69 6e 61 6d 65 09 | 64 63 2e 62 09 22 69 6e |tuiname.|dc.b."in|
|00003080| 74 75 69 74 69 6f 6e 2e | 6c 69 62 72 61 72 79 22 |tuition.|library"|
|00003090| 2c 30 0a 67 66 78 6e 61 | 6d 65 09 09 64 63 2e 62 |,0.gfxna|me..dc.b|
|000030a0| 09 22 67 72 61 70 68 69 | 63 73 2e 6c 69 62 72 61 |."graphi|cs.libra|
|000030b0| 72 79 22 2c 30 0a 64 6f | 73 6e 61 6d 65 09 09 64 |ry",0.do|sname..d|
|000030c0| 63 2e 62 09 22 64 6f 73 | 2e 6c 69 62 72 61 72 79 |c.b."dos|.library|
|000030d0| 22 2c 30 0a 70 6f 72 74 | 6e 61 6d 65 09 64 63 2e |",0.port|name.dc.|
|000030e0| 62 09 22 48 69 50 2d 50 | 6f 72 74 22 2c 30 0a 20 |b."HiP-P|ort",0. |
|000030f0| 65 76 65 6e 0a 0a 0a 20 | 09 73 65 63 74 69 6f 6e |even... |.section|
|00003100| 09 75 64 6e 6d 2c 62 73 | 73 5f 70 0a 0a 2a 20 56 |.udnm,bs|s_p..* V|
|00003110| 61 72 69 61 62 6c 65 73 | 0a 0a 76 61 72 5f 62 09 |ariables|..var_b.|
|00003120| 09 64 73 2e 62 09 73 69 | 7a 65 5f 76 61 72 0a 0a |.ds.b.si|ze_var..|
|00003130| 09 73 65 63 74 69 6f 6e | 09 68 69 68 69 2c 62 73 |.section|.hihi,bs|
|00003140| 73 5f 63 0a 0a 2a 20 47 | 46 58 20 62 75 66 66 65 |s_c..* G|FX buffe|
|00003150| 72 73 0a 0a 62 75 66 66 | 65 72 31 09 64 73 2e 62 |rs..buff|er1.ds.b|
|00003160| 09 57 49 44 54 48 2f 38 | 2a 48 45 49 47 48 54 0a |.WIDTH/8|*HEIGHT.|
|00003170| 62 75 66 66 65 72 32 09 | 64 73 2e 62 09 57 49 44 |buffer2.|ds.b.WID|
|00003180| 54 48 2f 38 2a 48 45 49 | 47 48 54 0a 0a 20 65 6e |TH/8*HEI|GHT.. en|
|00003190| 64 0a | |d. | |
+--------+-------------------------+-------------------------+--------+--------+
